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Vorwort 


"Zaschencomputer" lautet die neue Bezeichnung Hewlett-Pak- 
<kards für die Reihe HP-41C/CV/CX. Aus dem programmierbaren Ta- 
schenrechner wurde ein Computer mit umfangreicher Peripherie 
(Drucker, Massenspeicher, Monitor, Standard- und spezielle 
Schnittstellen, Meßgeräte u. a.). Trotz der nicht gerade com- 
putergemäßen Programmiersprache und der Speicheradressierung 
über Registernummern, lassen sich mit dem HP-41-System sehr 
xomplexe Probleme bewältigen. So spricht nichts mehr dagegen, 
auch bei der Entwicklung von HP-41-Software nach den von grö- 
Beren Computern bekannten Methoden vorzugehen. Zwei Prinzipien 


sollen hier betont werden: 


- Modularität: Ein Modul ist ein Stück Programm (meist ein Un- 
terprogramm), dessen Funktion sowie dessen Eingangs- und 
Ausgangswerte (die Schnittstelle) exakt definiert sind. Ist 
ein Modul programmiert und getestet, interessiert die Reali- 
sation der Funktion (der Programmtext) nicht mehr, nur noch 


Funktion und Schnittstelle sind relevant. 


- Schrittweise Verfeinerung (stepwise refinement): Ein komple- 
xes, abstrakt formuliertes Problem wird hierarchisch in im- 
mer Kleinere und konkretere Teilaufgaben zerlegt. Diese wer- 
den natürlich als Module realisiert. 


Das zweite Prinzip spiegelt sich in der Einteilung des Buches 
wider. Teil 1 führt in die Problemstellung ein und gibt einen 
Überblick über seine Lösung. Teil 2 behandelt die dadurch be- 
dingte Datenstruktur. Teil 3 beschreibt in Katalogform die 
einzelnen Module. Die schrittweise Verfeinerung erstreckt sich 
hier über zwei Stufen: die dem Anwender zugänglichen Funktio- 


nen einerseits und die internen Module andererseits. Teil 4 


vI Vorwort 


und Teil 5 schließlich behandeln wesentliche Aspekte der Pro- 
grammoptimierung und der synthetischen Programmierung, soweit 


sie für ernsthafte Anwendungen relevant sind. 


Das Buch erfüllt somit mehrere Funktionen: 


- Es enthält ein bewährtes Programmpaket zur komfortablen Ver- 
waltung von Adressenmaterial. 


- Der Programmierer kann aus den Modulen der Adressenverwal- 
tung nach einfachen Modifikationen ein System zur Verwaltung 
eines beliebigen strukturierten Datenbestandes zusammenstel- 


len und optimieren. 


- Das Buch zeigt den Einsatz moderner Methoden der Software- 
entwicklung mit dem HP-41. 


- Schließlich findet der interessierte Leser zwei einfache 
Verfahren zur Programmoptimierung, zahlreiche Tricks zur 
Verringerung der Rechenzeit und des Speicherbedarfes sowie 
interessante Details wie etwa die Speicherformate des Rech- 
ners und des IL-Massenspeichers. Außerdem wird ein kurzer, 
praxisbezogener Zugang zur synthetischen Programmierung ver- 
mittelt. 


Mein Dank gilt Herrn Gerhard Kruse, Aachen, für die beiden ex- 
zellenten Programme Key Assignment und Load Bytes sowie der 
EDV-COMPAS GmbH, Memmingen, für die Stellung des Textverarbei- 
tungssystems. Schließlich möchte ich den zuständigen Mitarbei- 
tern des Verlages für ihre Offenheit gegenüber der besonderen 
Form des Buches und die gute Zusammenarbeit danken. 


Grönenbach, im Januar 1984 Michael Gehret 
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srstrichen dargestellt. So ist ASCII (A) = 65 und ASCII (A) = 


sind un- 


1 Einführung 


1.1 Dateiverwaltung? 


-ie Verwaltung eines strukturierten Datenbestandes ist eine in 
zer EDV allgegenwärtige Aufgabenstellung. Ob Adressenverwal- 
<zıng oder Telefonverzeichnis, ob Bibliographie oder Personal- 
Sazrei — immer sind bestimmte Funktionen auf einer Menge von 


Zzzenobjekten auszuführen: 


- Neuaufnahme: Daten werden eingegeben und in die Datei aufge- 


nommen. 
- Löschen: bestimmte Datenobjekte werden gelöscht. 

- Ändern: Daten werden abgeändert. 

- Drucken: bestimmte Daten werden auf dem Drucker ausgegeben. 


- Auswahl: die zu löschenden, zu ändernden oder auszugebenden 
Zazenobjekte müssen erst ausgewählt (selektiert) werden. 


zerrere Eigenschaften oder Merkmale vieler Datenobjekte 


‚2_zet werden sollen, muß die Datei strukturiert sein. Die 


ienelle Einteilung entspricht der einer Kartei: 


27 Inhalt manuelle DV 


Ems Gesamtheit aller Objekte Kartei 
LET S527Z Beschreibung eines Objekts Karteikarte 
<z’eld ein Merkmal des Objekts Feld 


2 1 Einführung 


1.2 Konkretisierung der Aufgabenstellung 


1.2.1 Hardware 


Da der HP-41CV bzw. das HP-82170A QUAD MEMORY stark verbreitet 
sind, kann von einem Rechner mit maximalem Arbeitsspeicher 
(320 Register einschließlich permanentem .END.) ausgegangen 
werden. Die zahlreichen Funktionen des HP-82180A X FUNCTIONS 
Modules bzw. die entsprechenden Anweisungen des HP-41CX ermög- 
lichen erst eine effiziente Programmierung des Rechners. Das 
Dateisystem benötigt insbesondere die ALPHA-Funktionen sowie 
die ASCII-File-Datenstruktur. So bildet der HP-41CX die beste 
Grundlage für die hier vorgestellte Software, jedoch eignen 
sich auch der HP-41CV und - eventuell mit Port-Extender - der 
HP-41C. Je nach der Anzahl der Datensätze pro Cassette sind 
noch ein oder zwei HP-82181A X MEMORY Module notwendig. 


Zur Speicherung der Datei dient das HP-82161A DIGITAL CASSETTE 
DRIVE. Das System soll neben IL-Druckern (HP-82162A) auch den 
"alten! Einsteckdrucker HP-82143A unterstützen. 


1.2.2 Mengengerüst 


Die Datei soll unbegrenzt viele Datensätze aufnehmen. Sie kann 
sich also über mehrere Cassetten erstrecken, die automatisch 
verwaltet werden. Das ADRESS-System speichert pro Cassette ma- 
ximal 413 Datensätze mit je bis zu 206 Zeichen (vgl. 2.3). Ein 
Datensatz des ADRESS-Systems enthält 17 Felder: 


WAHL Zwischenspeicher für 
eine Auswahl 

ANREDEl, TITELi1, VORNAMEl, NACHNAME1 erste Person 

ANREDE2, TITEL2, VORNAME2, NACHNAME2 zweite Person 

ZUSATZ zusätzliches Feld 

STRASSE, _NR., PLZ, ORT Adresse 


FELD1, FELD2, FELD3, FELD4 zusätzliche Felder 
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Jedes Datensatzfeld faßt maximal 24 Zeichen. Dies erlaubt eine 
effiziente Verarbeitung direkt im ALPHA-Register, das auch bei 


der Eingabe verwendet wird. 


1.2.3 Zeichendarstellung 


Der Rechner kann im Display nur die Kleinbuchstaben a bis e, 
Großbuchstaben und Sonderzeichen anzeigen. Da Großbuchstaben 
relativ selten vorkommen, werden Kleinbuchstaben als Großbuch- 
staben dargestellt und eingegeben. Großbuchstaben werden durch 
ein vorangestelltes 3 gekennzeichnet (dieses Zeichen benö- 
tigt in der Anzeige keinen zusätzlichen Platz). Mit den Son- 
derzeichen für ß und die Umlaute gelten folgende Ersatzdar- 
stellungen bei der Eingabe und der Anzeige: 


Kleinbuchstaben A bis Z 


Großbuchstaben YA bis :Z 

ä, Ä a ("SHIFT" "A'N), va 
5,6 € C"SHIFT" "O"),  :d 
3, Ü # ("SHIFT" "H"), 1 
3 $ ("SHIFT" "P'"), 


wird bei Großschrift in SS umgewandelt. 


1.2.4 Funktionen 
- Neuaufnahme eines Datensatzes; 


- Auswahl eines oder mehrerer Datensätze nach definierbaren 
Feldinhalten oder -teilinhalten; 


- Ändern ausgewählter Datensätze: entweder manuell einzeln 
(ähnlich Neuaufnahme) oder automatisch einheitlich (bei Zah- 
len auch relativ); 


- Löschen ausgewählter Datensätze: entweder im Dialog einzeln 
oder automatisch; versehentlich gelöschte Datensätze können 


unter Umständen "repariert!" werden; 


- Drucken ausgewählter Datensätze: das Format (Position der 
einzelnen Felder, Breit- oder Normalschrift) ist definier- 
bar, die Reihenfolge der Felder jedoch fest; Groß- und 
Kleinschrift oder nur Großschrift; Umlaute und ß ; zusätz- 
liche Schnelldruck-Routine, die die Feldinhalte ausdruckt, 
wie sie in der Anzeige dargestellt werden; 


- Zählen der ausgewählten und aller Datensätze; Ausgabe über 


Anzeige oder Drucker; 


- Anzeige oder Ausdruck eines Datei-Inhaltsverzeichnisses (je 
Cassette); 


- Cassettenwechsel mit Benutzerführung; 


— Zusätzliche vom Anwender programmierbare Funktion; 


Kontrolliertes Ende der Dateibearbeitung. 


Alle Funktionen können beliebig kombiniert werden. Die selek- 
tierten Datensätze bleiben ausgewählt. So können Und- oder 


Oder-Verknüpfungen realisiert werden. 


Bei der Neuaufnahme, der Auswahl und der manuellen Änderung 
können :HERRN durch H und :FRAU durch F abgekürzt wer- 
den (Felder ANREDE1 und ANREDE2); ein = im Feld NACHNAME2 
kopiert den Inhalt des Feldes NACHNAME1 (programmierte Abkür- 
zungen des ADRESS-Systems). Das System überprüft, ob die Fel- 
der NACHNAME1, ORT und FELD1 nicht leer sind (Plausibilitäts- 
kontrolle). 
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1.. 


2.5 Bedienung 


22h Benutzer, die mit dem HP-41 nicht vertraut sind, sollen 


ach kurzer Zeit - ohne Nachschlagen in der Bedienungsanlei- 


zz - mit dem System umgehen können. Deshalb verfügen die 


ramme über nur zwei einheitliche Benutzerschnittstellen: 


a 


- Fragen des Systems werden mit JA oder NEIN beantwortet 


NEIN kann entfallen oder durch beliebigen Text außer JA 
ersetzt werden). Das Menu dient zur Auswahl der einzelnen 
Funktionen. Es besteht aus einer Reihe von Fragen. Nach der 


Azsführung einer Funktion wird wieder in das Menu verzweigt. 


Zie Satzeingabe dient zur Eingabe aller satz- oder feldbezo- 
zenen Daten. Neben Datensatzinhalten (Neuaufnahme, manuelles 
&rdern) sind dies die Suchbegriffe bei der Auswahl, die au- 
<cmatischen Änderungen und das Druckformat. Die Satzeingabe 


xann beliebig oft wiederholt werden. 


ız Datensatzfeld kann natürlich auch leer sein. Es enthält 


zzrr an erster Stelle entweder 


re 


Ss 


ein + : das Feld ist zwar leer, der Inhalt wird aber noch 
srmittelt und später eingegeben. Durch die Auswahl nach + 
srhält man alle unvollständigen Datensätze (Datenpflege); 


ib 
a 


(Space, Blank): das Feld ist - und bleibt voraus- 
sichtlich - leer. 


2.6 Modularisierung, residente und transiente Files 


e gesamte Software wird modular aufgebaut (vgl. 6.1). Hierzu 


:rd die komplexe Aufgabe Dateibearbeitung hierarchisch in 


ichter überschaubare und konkretere Einzelprobleme zerlegt 


tepwise refinement). 


6 ı Einführung 


Als erste Stufe der Verfeinerung bietet sich eine Aufteilung 
nach den Funktionen an, die dem Benutzer direkt zugänglich 
sind (Anwendermodule). Dies sind die Hilfsprogramme (Module 
BE, IN, UP) sowie die Bearbeitungsfunktionen des Systems (mit 
Kleinbuchstaben als Modulnamen). 


Die Anwendermodule rufen ihrerseits eine große Anzahl von in- 
ternen Funktionen auf, die der Benutzer normalerweise nicht 
erreichen kann (interne Module, benannt mit Großbuchstaben). 


Die internen Module rufen sich auch gegenseitig auf. 


Der große Umfang der Software erfordert eine Aufteilung auf 
mindestens drei Programmfiles, die auch auf den Datencassetten 
gespeichert werden (Modul IN). Dies ermöglicht das Laden von 
Programmteilen ohne Cassettenwechsel. Da die internen Module 
von mehreren Anwendermodulen und anderen internen Modulen auf- 
gerufen werden, stehen sie - mit einer Ausnahme (Modul A) - 
nach dem Start der Dateibearbeitung dauernd im Programmspei- 
cher des Rechners (in einem residenten File, ADRESS-System: 
A). Die Anwendermodule sind in transienten Files (AA, AAA) ge- 
speichert. Wird ein solches Programmfile von der Cassette ein- 
gelesen, ersetzt es das zuvor geladene transiente File. Die 
Filenamen werden aus Zeichen mit ASCII-Codes größer als 127 
(dezimal) gebildet, um Kollisionen mit den Namen der Datensät- 


ze zu vermeiden. 


2 Datenstruktur 


Bild 2-1 zeigt die Datenstruktur des Systems. Die Namen der 
Funktionen sind durch die entsprechenden Modulnamen abgekürzt. 


2.1 Datei 


Zum Speichern einzelner Datensätze im Rechner eignen sich sehr 
gut die ASCII-Files des Extended Memories. Sie verfügen über 
eine der Datensatzstruktur entsprechende Einteilung in Re- 
cords. Diese ist zudem dynamisch: Speicherplatz, der für ein 
Feld nicht benötigt wird, kann für die anderen Felder verwen- 
det werden. Ein weiterer Vorteil ist die einfache Editierbar- 
keit dieser Struktur auf Zeichen- und Feldebene. Die entspre- 
chenden Funktionen sind allerdings wegen des hohen internen 


Verwaltungsaufwandes relativ langsam. 


ASCII-Files können direkt mit IL-Massenspeichern ausgetauscht 
werden. Die AS-Files des Cassettenlaufwerks müssen jedoch ein- 
zeln formatiert (CREATE) werden und besitzen vor der ersten 
Speicherung eines ASCII-Files aus dem Extended Memory den Typ 
DA-File. Ein GETAS eines solchen leeren DA-Files führt zur 
Fehlermeldung FL_TYPE_ERROR. 


Zur Bearbeitung im Rechner werden Datensätze in die ASCII-Fi- 
les A oder V geladen. Felder oder Zeichen dieser Files (sie 
werden fast immer durch einen einzigen Zeiger adressiert) 
heißen im folgenden AFELD, AZEICHEN, VFELD bzw. VZEICHEN. 
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2.2 Daten zur Verwaltung der Datei 


2.2.1 Inhaltsverzeichnis 


Die zentralen Mittel zur Verwaltung der Datei sind die In- 
haltsverzeichnisse. Sie werden neben den Cassetten-Directories 
geführt und enthalten die Namen aller Datensätze einer Casset- 
te. Diese Datensatznamen (DSN) werden jeweils aus maximal 
sechs Zeichen (der Rest wird mit Blanks aufgefüllt) eines Da- 
tensatzfeldes (beim ADRESS-System die ersten sechs Zeichen des 
Feldes NACHNAMEl) und einer binär codierten Zahl zwischen 45 
und 255 gebildet (CODE). 44 ist der ASCII-Code des Kommas, das 
bei File-Operationen (X FUNCTIONS oder IL) als Argumenttrenner 


verwendet wird und deshalb nicht in Filenamen auftauchen darf. 


Datensätze können markiert werden. Dazu stehen an der achten 


Position eines Datensatznamens alternativ folgende Zeichen: 


- & - demarkiert: keine Markierung; 


- # - ausgewählt: der entsprechende Datensatz ist ausgewählt 


(Auswahl, Neuaufnahme oder Löschen); 


- ! - vorausgewählt: der Datensatzname wurde vorselektiert; 
diese Markierung wird noch innerhalb der Auswahl-Funk- 


tion durch & oder # ersetzt; 


- k - gelöscht: der entsprechende Datensatz ist - logisch - 
gelöscht und kann bei der Neuaufnahme überschrieben und 
damit auch physisch gelöscht werden. 


Die Inhaltsverzeichnisse werden in den ASCII-Files I sowohl im 


Extended Memory als auch auf den Datencassetten gespeichert. 


Die Datensätze sind auf den Cassetten unter ihren Datensatzna- 


men gespeichert. 


10 2 Datenstruktur 


2.2.2 Cassettenkennung 

Die Datei kann sich über mehrere Cassetten ers7res<ken. Da je- 
weils nur auf eine Cassette zugegriffen werden <ann, muß es 
eine eindeutige Zuordnung zwischen den Datenrs=s’7zrazen und den 
Cassetten geben. Dies wird durch die Casse’zTenkennung er- 
reicht. 


Die Kennung besteht aus zwei Zeichen (beim ADARESS-System aus 
Buchstaben - Umlaute werden in die vokalen Aquivalente umge- 
wandelt), die die lexikografischen Grenzen der Datensatznamen 
einer Cassette angeben. So können auf einer Cassette mit der 
Kennung G und K nur Datensätze gespeichert werden, deren 
Datensatznamen mit den Buchstaben G ,„, H, I. 3 oder K' 
beginnen. Diese Zuordnung wird vom System laufend überprüft. 
Paßt die Kennung nicht, wird der Benutzer zum Wechsel der Cas- 
sette aufgefordert, wobei das erste Zeichen des entsprechenden 


Datensatznamens angezeigt wird. 


Diese Sicherung funktioniert nur korrekt, wenn die Menge der 
Datensatznamen lückenlos in sich nicht überschneidende Teilbe- 
reiche eingeteilt worden ist. Der Benutzer nimmt diese Eintei- 
lung bei der Initialisierung der Datencassetten (Modul IN bzw. 
ADRIN-Programm des ADRESS-Systems) vor. 


Die ASCII-Werte der Kennung (KUNT und KOBE, untere und obere 
Kennung) werden auf der Cassette im Datenregisterfile (beim 
ADRESS-System: a) gespeichert. Die Kennung der eingelegten 
Cassette wird im Menu angezeigt. 


2.2.3 Datensatzanzahlen 


Damit nicht bei jedem Aufruf der Zählen-Funktion die Daten- 
satznamen im Inhaltsverzeichnis gezählt werden müssen - eine 
recht langwierige Operation -, werden vom System laufend zwei 


weitere Variablen unterhalten: 
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-— ZTOT: die Anzahl aller Datensätze der eingelegten Cassette 
— ZAUS: die Anzahl der ausgewählten Datensätze der Cassette 


Diese Werte werden im Datenregisterfile auf der Cassette ge- 


speichert. 


2.2.4 Systemkonstanten 


Die Konstanten werden nur einmal zu Beginn der Dateibearbei- 
tung (Modul BE bzw. ADRBE-Programm) aus dem Datenregisterfile 


in die Register des Rechners geladen. 


2.3 Mengengerüst 


2.3.1 Speicherung im Rechner 


Daten und Programme im Main Memory 


Der Rechner zeigt bei leerem Programmspeicher und SIZE_0O00 319 
freie Register an. Drei Bytes eines Registers werden jedoch 
vom permanenten .END, belegt, das den Programmspeicherbe- 
reich - auch den leeren - abschließt. Da dieses .END. die END- 
Anweisung des jeweils letzten Programmes im Speicher ersetzen 
kann, stehen für Daten und Programme sowie für Tastenzuordnun- 
gen, Alarme etc. insgesamt 320 Register zur Verfügung. 


ASCII-Files im Extended Memory 
Je nach der Zahl der eingesetzten X MEMORY Module beträgt die 


Kapazität des Extended Memories 126, 364 oder 602 Register mit 
je 7 Bytes. Jedes File des Extended Memories benötigt zwei zu- 
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sätzliche Register für interne Verwaltungsinformationen. EMDIR 
wie FLSIZE zeigen die Filelängen ohne diese Header-Register 
an. Die von EMDIR gelieferte Zahl berücksichtigt jedoch die 
beiden Register für das "nächste" File, sodaß die Anweisungs- 
folge EMDIR CRFLAS das Extended Memory ganz belegt. 


Den Records eines ASCII-Files im Extended Memory - bei IL-Mas- 
senspeichern verhält es sich anders - ist jeweils ein Byte 
vorangestellt, das die Recordlänge in Bytes (Zeichen) angibt. 
Ein Byte nach dem letzten Record kennzeichnet mit dem Wert 255 
(hexadezimal FF) das Ende des Files. Deshalb ist die Record- 
länge bei ASCII-Files auf 254 Zeichen beschränkt. 


Somit benötigt ein ASCII-File des Extended Memories mit einer 


Kapazität von z Zeichen in f Feldern (Records) 
2 +C = 2 + aufgerundet((z + £f + 1) / 7) Register. 


c ist die Registeranzahl, die bei CRFLAS anzugeben ist. 


Programme im Main Memory 
Beim Laden von Programmen von IL-Massenspeichern ist die Pro- 


grammlänge in Registern (nicht in Bytes) maßgebend. Für Pro- 
gramme der Länge b„ gilt also bei d Datenregistern: 


aufgerundet(b, IT) + aufgerundet(b, IT) +... << 320 -d 


Programme im Extended Memory 


Auch ein PR-File des Extended Memories benötigt zwei zusätzli- 
che Register zur Verwaltung. Die Programmbytes werden um ein 


Byte Prüfsumme ergänzt. Ein Programm mit b Bytes benötigt also 


2 + c = 2 + aufgerundet((b + 1) / 7) Register. 
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2.3.2 Speicherung auf Cassette 


IL-Massenspeichermedien sind in Records - nicht zu verwechseln 
mit den Records der ASCII-Files - mit je 256 Bytes eingeteilt. 
Die Digitalcassette hat eine Kapazität von 512 Records, die 


wie folgt belegt werden: 


2 Records interne Verwaltungsdaten (Header) 
n Records (n = 1 bis 56) Directory 
512 - n - 2 Records Daten und Programme 


Ein Record des Directories nimmt acht Einträge auf, der letzte 
nur sieben. Der Rest eines "angebrochenen'" Records kann nicht 
für ein anderes File verwendet werden. Daten und Programme 
werden auf der Cassette nicht in dem Format des Main oder Ex- 


tended Memories des Rechners gespeichert. 


DA- und AS-Files sind in Registern zu je 8 Bytes organisiert. 
Ein mit 32 CREATE erzeugtes DA-File ist also nicht 224 sondern 
256 Bytes lang und belegt exakt einen Record. 


Datenregister auf Cassette 


Ein Record eines DA-Files faßt - wie eine Magnetkarte - 32 Da- 
tenregister des Rechners. Die 7-Byte-Register-Inhalte werden 


bei der Speicherung in 8-Byte-Werte umgewandelt. 


ASCII-Files auf Cassette 


Um Datenkompatibilität mit anderen HP-IL-Computern zu errei- 
chen, werden bei den AS-Files der IL-Massenspeicher jeweils 
zwei Bytes für die Speicherung der Recordlänge verwandt. Das 
Endezeichen hat den Wert 65535 (hexadezimal FFFF). 


Den 7-Byte-Registern des Extended Memories entsprechen jedoch 
Register mit 8 Bytes beim IL-Massenspeicher. So läßt sich in 
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ASCII-Files einheitlicher Länge (in Registern gemessen: CRFLAS 
bzw. CREATE) im Extended Memory und auf Cassette dieselbe In- 
formationsmenge speichern, sofern die Feldanzahl kleiner als 
die Registerzahl ist. Die folgenden Beispiele verdeutlichen 
diesen Zusammenhang: 


30 Felder mit je 6 Bytes und ein Feld mit 12 Bytes 


Extended Memory: 30 *6 + 12 = 192 Datenbytes 
31 +1 = 32 Formatbytes 
32 Register 32 #7 = 224 Bytes 
Cassette: 30 *6 + 12 = 192 Datenbytes 
31 *%2 +2 = 64 Formatbytes 
32 Register 32 *8 = 256 Bytes 


31 Felder mit je 6 Bytes und ein Feld mit 5 Bytes 


Extended Memory: 31 *6+5 = 191 Datenbytes 
32 +1 = 33 Formatbytes 
32 Register 32 *7 = 224 Bytes 
Cassette: 3.6 +5 = 191 Datenbytes 
32 *#%2+2 = 68 Formatbytes 
33 Register 33*8 > 259 Bytes 


Programme auf Cassette 


Programme werden direkt transferiert, jedoch im IL-Massenspei- 
cher um ein Byte Prüfsumme ergänzt. So faßt der letzte Record 
eines PR-Files auf der Cassette nur 255, alle anderen 256 Pro- 
grammbytes. 


2.3.3 Folgerungen für das Mengengerüst - FORMAT 


Aus den dargestellten Zusammenhängen lassen sich zwei Restrik- 


tionen für die Kapazität eines Datensatzes und für die Anzahl 
der Datensätze pro Cassette ableiten. 
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Vorausgesetzt wird, daß die Anzahl der Felder eines Datensa:- 


zes kleiner ist als seine Länge in Registern. Dies ist ab ei- 


ner durchschnittlichen Feldlänge von 7 Zeichen sicher der 


Fall. 


Da Datensatznamen mit Markierung acht Bytes belegen, ist 


die entsprechende Voraussetzung für das Inhaltsverzeichnis I 
erfüllt. 


Die gegebenen Ausgangsgrößen sind: 


ZA 


ZL 
FA 
xXA 


Anzahl der zusätzlichen Files auf der Datencassette 
(Programme, Datenregisterfile etc., ohne I) 

Länge aller dieser Files in Records 

Anzahl der Felder pro Datensatz 

Anzahl der eingesetzten X MEMORY Module 


Die Größen 


SA 
SsK 


Anzahl der Datensätze pro Cassette 
Kapazität eines Datensatzes in Zeichen 


sind zu maximieren. Es treten folgende Zwischengrößen auf: 


XK 


CK 


5X 


sc 


IX 


IC 


Nettokapazität des Extended Memories (ohne Headers) in 
Registern 

Nettokapazität einer Cassette (ohne Directory und Hea- 
der) in Records 

Länge eines Datensatzes im Extended Memory in Registern 
Länge eines Datensatzes auf der Cassette in Records 
Länge des Inhaltsverzeichnisses I im Extended Memory in 
Registern 

Länge des Inhaltsverzeichnisses I auf der Cassette in 
Records 


Der Rechengang für das Extended Memory: 


XK 


SX 


122 + 240 * XA - 3* 2 


(X FUNCTIONS) (X MEMORY) (Header A, V, I) 
aufgerundet((SK + FA + 1) / 7) 
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IX = aufgerundet((8 * SA + SA + 1) / 7) 

2 * SX + IX s XK (in Registern) 

(A,V) (I 

... und für die Cassette: 

ck 512 - 2 - aufgerundet((ZA + SA +1+1)/ 8) 
(Header) (I) 

SC = aufgerundet(SX / 32) 


IC aufgerundet(IX / 32) 
SA * SC + IC s CK (in Records) 


Bild 2-2 zeigt das Programm FORMAT (Barcode s. 6.2), das be- 
liebige Kombinationen der Ausgangsgrößen und der zu optimie- 
renden Werte testet und die Güte der Optimierung anzeigt. Die 
Bedienung des Programmes (XXXX bezeichnet eine Ausgabe des 
Rechners, £ steht für vom Programmlauf abhängige Zeichen): 


1. CF_21 oder SF_21 und Printer auf NORM stellen (zur Proto- 


kollierung) 
2. XEQ "FORMAT" 
3. ZUS,FILES ANZAHL? £ 
4. ZA eingeben oder ändern (ohne R/S) 
5. ZUS.FILES LAENGE REC.S? £ 
6. ZL eingeben oder ändern 
7. SATZLAENGE ZEICH.? £ 
8. SK eingeben oder ändern 
9. FELDANZAHL? £ 
10. FA eingeben oder ändern 
11. SATZANZAHL? £ 
12. SA eingeben oder ändern 
13. XMEM. ANZAHL? £ 
14. XA eingeben oder ändern 
15. XMEM. £ REG.S 
16. falls das Extended Memory nicht ausreicht (£ REG.S < 0), 


weiter bei 7. 
17, CASS. £ REC.S 
18. weiter bei 7. 
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An den Zahlen der nicht belegten (£ positiv) oder der überzäh- 
ligen (£ negativ) Register bzw. Records erkennt man die Güte 
der Annäherung an das Optimum. Mit einem Druck auf die 


USER-Taste kann die Eingabe vorzeitig verlassen werden (weiter 
bei 15.), 


BI+LBL "FORMAT" 38 xEQ 81 68 2 88 7 
28 31 STO 86 61 + 
83 PSIZE 32 ST+ X 62 8 BILBL 82 
84 CLRG 33 9 63 XEQ 02 %/ 
85 CF 27 34 RCL 84 64 + 91 ENTER? 
86 CF 29 3 + 65 518 92 FRE 
87 FIX 8 36 xEQ 91 66 " REC.SCRSS, * 93 %28? 
88 "ZUS.FILES * 37 STO 97 67 XEQ 08 94 SICH 
89 XEO 83 38 + 68 BEEP + 
18 "ZUS.FILES LAENG“ 39 RCL 5 63 CTO 15 % INT 
11 “HE REC.S" 48 248 97 RIN 
12 XEQ 84 4% 7O+LBL 88 
42 - 1- IgeLBL 83 
13+LBL 15 43 116 72 CH$ 39 "HANZAHL" 
14 CF 2 44" REG.SXMEN. * 73 99? 
152 45 XEQ 88 74 "t+ 188+LBL 84 
16 STO 87 46 RCL 86 75 ARCL X 191 7° 
17 "SATZLAENGE ZEIC" 7% 766 182 ARCL IND 87 
18° 48 XEQ B2 7? AROT 183 TONE 9 
19 XEQ 84 49 RCL 4 78 KoY 184 AVIEN 
28 "FELD" 50 + 79x68? 185 PSE 
21 XEQ 83 51 RCL 8 88 TONE 8 186 FC? 22 
22 "SATZ* 52 + 81 AVIEM 187 PSE 
23 XEQ 03 53 RCL 87 82 X? 188 CLD 
24 "XMEM. " 54 3 83 GTO 15 189 FS?C 22 
25 XEQ 83 55 xEQ 82 84 RTH 119 STO IND 87 
56 + 111 FS%C 27 
26+LBL 16 57 RCL 88 85+LBL 81 112 6TO 16 
2? RCL 82 58 RCL 84 86 1 113 ISC 87 
28 RCL 83 59 + 87 + 114 „END. 
29 + 


Bild 2-2 Listing FORMAT 
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2.3.4 Folgerungen für die Speicherung der Software 


Für die Aufteilung der Module auf das residente und die tran- 
sienten Programmfiles sind vor allem folgende Aspekte rele- 
vant: 


- Programmfilelängen von knapp unter n * 256 Bytes (n natürli- 
che Zahl) sichern eine gute Ausnutzung des Speichermediunms. 


- Für das residente Programmfile, das längste transiente File 
und die Datenregister stehen insgesamt 320 Register des 


Rechners zur Verfügung. 


- Der Programmspeicher des Rechners wird effizient genutzt, 


wenn die transienten Files ungefähr gleich lang sind. 


3 Software 


Hier sind alle Module des ADRESS-Systems in Katalogform aufge- 
führt (zur Modularisierung vgl. 1.2.6 und 6.1). Die einheitli- 
che Struktur der Modulbeschreibungen erleichtert das Auffinden 
bestimmter Einzelheiten: 


- Kurze Beschreibung der Aufgabe des Moduls innerhalb des ge- 
samten Systems; die Funktionsbeschreibungen der Anwendermo- 
dule ergeben zusammengenommen die Bedienungsanleitung der 


Adressenverwaltung. 


- Übersichtliche Darstellung wichtiger Eigenschaften des Mo- 
duis: Namen der aufrufenden und aufgerufenen Module, genaue 
Definition der Schnittstelle (Register und Flags als Ein- 
gangs- oder Ausgangsparameter), Name des nach Verlassen des 
Moduls definierten working files, Inhalte der verwendeten 
Datenregister, Bedeutung der benutzten Flags (im gesetzten 
Zustand). Die wichtigsten dieser Daten finden sich in zusam- 


mengefaßter Form in 6.1 (Cross Reference). 


- Eingehende Beschreibung algorithmischer oder programmier- 
technischer Besonderheiten, soweit sie nicht als Maßnahmen 
der Programmoptimierung in Teil 5 aufgeführt sind. 


- Hinweise auf die bei der Programmierung einer eigenen Datei- 
verwaltung möglichen oder notwendigen Modifikationen. In ei- 
nigen Fällen werden auch Module anderer Dateiverwaltungen 
gezeigt. 


- Der Text wird jeweils durch einen Programmablaufplan sowie 


ein Programmlisting ergänzt. 
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Falls nicht anders vermerkt, beziehen sich alle Daten (Zeilen- 
nummern, Labelargumente etc.) auf die Module des ADRESS-Sy- 


stems. 


3.1 Anwendermodule 


3.1.1 BE - Bootstrap der Dateibearbeitung 


Aufgabe 


Das kurze Programm dient als Vorlauf für das eigentliche Da- 


teiverwaltungsprogramm, das mit dem Menu beginnt. 


Alle Programme des Dateisystems setzen ein MEMORY_LOST voraus. 
So kann der Benutzer mit der einfachen master clear-Prozedur 
einheitliche Startbedingungen schaffen und mit einer über die 
Tastatur ausgeführten READP-Anweisung das Programm laden und 
starten. Wegen der durch master clear bewirkten Speicherver- 
teilung von minimal (HP-41C/CV) nur 47 Registern Programmspei- 
cher darf dieses erste Programm nur 329 Bytes lang sein. Es 
kann aber seinerseits den Speicher mit PSIZE neu einteilen und 
ein längeres Programm laden. BE führt noch Aktionen aus, die 


nur einmal pro Lauf der Dateiverwaltung notwendig sind: 


- Einlesen des Datenregisterfiles a 

- Frage, ob TONE und BEEP abgestellt werden sollen 

- Initialisierung der Flags 

— Erzeugung der ASCII-Files A, V und I im Extended Memory 

—- Neuverteilung des Speicherbereiches 

- Laden des residenten Programmfiles A; das ADRBE-Programm 
wird überschrieben und der Programmlauf mit der ersten An- 


weisung von A fortgesetzt. 


3.1.1 BE - Bootstrap der Dateibearbeitung 


di+LBL "ADRBE” 
v2“ 

63 READR 

64 RCL 31 

85 STOFLAG 

86 AON 
87 "OHNE TONE?“ 

a8 TONE ? 

89 AYTEH 

18 PSE 

11 FC? 23 

12 PSE 

13 FC?C 23 

14 PSE 

15 ASTO X 

16 "JA" 

17 ASTO Y 

18 %#7? 

19 6T0 14 
TONE abschalten eu CF 26 
21 RELFLAG 
22 STO 31 


23+LBL 14 


I: DCASS + XMEM 25 CLD 
A und V in XMEM erzeugen 


A: DCASS + PMEM 27 - 
28 "I" 


35 "A" 
DCASS: Datencassette N 


DMEM :. Datenspeicher 

PMEM : Programmspeicher 3 CRFLRS 

XMEM : Extended Memory 3 
48 READP 


41 „END. 


Bild 3-1 Ablaufplan ADRBE Bild 3-2 Listing ADRBE 
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Moduleigenschaften 


aufgerufenes Modul: m 
working file: V 
Besonderheiten 


Die Zeilen 008 bis 017 entsprechen fast gerai =!nem Aufruf des 
Modules J, welches jedoch zum Zeitpunkt ÖSes BE-Laufes nicht 
geladen ist. 


Die Größe des ASCII-Files I wird nach dem zur Verfügung ste- 
henden Extended Memory bestimmt (vgl. 2.3). 


Die Anweisungen 030 SF_25 und 032 CF_25 vermeiden die Fehler- 
meldung FL_TYPE_ERR beim GETAS eines leeren Inhaltsverzeich- 
nisses I, das ja in diesem Fall noch den Typ DA-File hat. 


Modifikation 

001 LBL_"ADRBE'" - Name des Programmes mit dem Modul BE 
002 "a'- Name des Datenregisterfiles 

026 68 - Größe 2 * SX + 4 (vgl. 2.3.3) 

039 "A' - Name des residenten Programmfiles 


3.1.2 IN - Initialisierung der Datencassetten oder Kopie 


Aufgabe 


Das Modul IN vereinigt zwei Funktionen: 


- Vorbereitung leerer oder zu löschender Cassetten zur Spei- 


cherung der Datensätze 


3.1.2 IN — Initialisierung der Datencassetten oder Kopie 23 


ADRIN 


"NEWM 419" 


a: PCASS »DMEM 
AA AAA ADRBE: PCASS + XMEM 


0) 
[5 oerer | 


l c: ohne Speicherung | 


> 


"KENNUNG? 
"UNTERE GRENZE?" 


gu 


XEQ "NEWM' ug NIS STE 


I auf DCASS erzeugen 


) 


a: DMEM +»CASS, A: PMEM»> CASS 
AA, AAA, ADRBE: XMEM > CASS 


ADRIN: XMEM + PCASS 
Erae>r 
T 


"OBERE GRENZE?" 
MEMORY LOST 


CASS : Cassette 

PCASS: Programmcassette 
DMEM : Datenspeicher 
PMEM : Programmspeicher 


XMEM : Extended Memory 
"FALSCHE" . 


F 


Bild 3-3 Ablaufplan ADRIN 
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@l+LBL "ADRIN” 34 SF 65 67 “NEHM 419” 198 SF 11 
v2 "" 35 F$? 6 68 BEEP 181 F5? 06 
83 READR 36 GTO 14 69 PROMPT 162 URTP 
84 RCL 11 37 CLA 78 AON 183 FS?C 06 
85 PSIZE 38 ASTO 04 1 532 184 SEC 
86 RCL 31 39 ASTO 85 72 "I" 1985 CF Il 
87 STOFLAG 73 CREATE 196 FE?C 85 
88 AON 4BeLBL Bl 187 GTO 66 
09 “* 41 “HKENNUNG“ ?74+LBL 14 188 STD c 
16 2 42 TOHE 8 75 RCL 11 189 STOP 
ti REL b 43 PSE 76“ 
12 °F" 44 "UNT" 7? CREATE t18+LBL 13 
13 READSUB 45 KEQ 13 78 HRTR t11 ALENG 
14 SAVEP 46 "OB" 79 F5? 06 112 2 
15 PCLPS 47 XEQ 13 88 SEC 113 + 
16 DSE Y 48 XEQ "W" 8 "* 114 "HERE GRENZE? * 
17 STO b 49 CLA 82 WRTP 115 ARCL IND X 
18 "ADRBE" 38 8=Y? 83 SEC 116 TONE 9 
19 READP 51 6T0 91 84 2 117 AYIEN 
28 SAYEP 52 ARCL 84 85 RCL b 118 PSE 
21 PCLPS 53 ARCL 85 86 "F° 119 FC? 23 
54 ATOX 87 GETP 128 PSE 
22+LBL 88 55 STO & 88 HRTP 121 FC? 23 
36 ATOX 89 SEC 122 PSE 
24 READP 57 ST0 83 98 DSE Y 123 CLD 
25 KOPIE“ 58 "FALSCHE " 91 STO b 124 FÜRC 23 
26 XEQ ".J" ‚9? 92 ADRBE“ 125 RTH 
27 %=1? 68 GTO Bi 93 GETP 126 SIGN 
28 SF 86 6i * 94 FC? 86 127 ALENG 
29 SF 87 62 80? 95 SF il 128 XY? 
38 XEQ *c” 63 GTO 81 96 WRTP 129 CLA 
31 "ENDE" 64 "RS" 97 SEC 138 ASTO IND L 
32 8EO "I" 65 ASTO & 98 PCLPS 131 „END. 
33 =? 66 AOFF 99 -ADRIN” 


Bild 3-4 Listing ADRIN 


- Anfertigen einer Sicherungskopie des gesamten Systems (KO- 
PIE). 


IN lädt und schreibt die Systemteile ADRBE, ADRIN (nur bei KO- 
PIE), A, AA und AAA sowie das Datenregisterfile a. Auf Daten- 
cassetten (nicht KOPIE) wird außerdem das ASCiI-File I erzeugt 


und die Cassettenkennung (KUNT, KOBE) gesreichert. 
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Moduleigenschaften 


aufgerufene Module: ce JIMW 


Datenregister: 04 KOBE als Zeichen 
05 KUNT als Zeichen 


Flags: 05 ENDE gewählt 
06 KOPIE gewählt 


Besonderheiten 
Die Programme und das Datenregisterfile - letzteres nur auf 
der Sicherungscassette - werden mit SEC vor versehentlichem 


Überschreiben geschützt. ADRBE wird auf Datencassetten wie 
ADRIN auf Sicherungscassetten mit SF_11 als automatisch star- 
tendes File gespeichert. 


Modifikation 

001 LBL_"ADRIN" - Name des Programmes mit dem Modul IN 
099 "ADRIN'" 

018, 092 |"ADRBE'" - Name des Programmes mit dem Modul BE 

009, 023,|"A'' - Name des residenten Programmfiles 

081 

012, 086 |"LA" 

002, 076 |"a'" - Name des Datenregisterfiles 

067 "NEWM_419" - der Wert SA + ZA + 1 (vgl. 2.3.3) 

071 532 - der Wert IX für zwei X MEMORY Module (vgl. 


2.3.3) 


26 


3.1.3 UP - Update des Systems 


A: CASS + PMEM 
ce: ohne Speicherung 
| 3: "ENDE" 


a (16-31): DMEM > CASS 
A: PMEM * CASS 


CASS ist 
PCASS? 


ADRIN: XMEM * PCASS 


T 
MEMORY LOST 


CASS : Cassette 

PCASS: Programmcassette 
DMEM : Datenspeicher 
PMEM : Programmspeicher 
XMEM : Extended Memory 


Bild 3-5 Ablaufplan ADRUP 


AA, AAA, ADRBE: XMEM > CASS 


3 Software 


UP dient zur 
Ak7i=2_isierung der Pro- 
graee “nö Konstanten 


KOFIZ-TsiL des Moduls 
IN. 

BescrÖiösrreiten 

Die Frcozramm und das 


Dalenrezisterfile wer- 
den - wenn nötig - mit 
UNSEC entsichert und mit 


an 


EC vor versehentlichem 
Überschreiben geschützt. 
ADRBE (nur auf Datencas- 
setten) und ADRIN (nur 
auf Programmcassetten) 
werden mit SF_11 als au- 
tomatisch startende Pro- 
grammfiles gespeichert. 
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@l+LBL "ADRUP" 22 "ADRIN“ 42 UNSEC 63 UNSEC 
82° 23 READP 43 6.831 64 FC? 66 
83 READR 24 SAVEP 44 SEEKR 65 SF Il 
84 RCL 11 25 PCLPS 45 WRTRX 66 HRTP 
85 PSIZE 46 F5? 86 67 SEC 
06 RCL 31 26+LBL H8 47 SEC 68 PCLPS 
87 STOFLAG a7" 48“ 69 FC?C 86 
@8 AON 28 READP 49 UNSEC 78 GT0 14 
09 “" 29 SF 97 58 HRTP ?L "ADRIN” 
18 2 36 XEQ “c” si SEC 72 GETP 
tl RCL b 31 "ENDE* 2 73 $F il 
12° 32 XER "J" 53 RCL b 24 URTP 
13 READSUB 33 %=Y? 54 “h* 75 SEC 
14 SAVEP 34 SF 85 55 GETP 
15 PCLPS 35 “ADRIN” 56 UNSEC 76+LBL 14 
16 DSE Y 36 SF 25 57 RIP TC 
17 STO b 37 UNSEC 58 SEC 78 FE9C 85 
18 "ADRBE” 38 FS?C 25 59 ISE Y 73 CTO 88 
19 READP 39 SF 86 68 STO b 88 5T0 c 
26 SAVEP 48 "" 61 "ADRBE* 81 „END. 
21 PCLPS 41 FS? 86 62 GETP 
Bild 3-6 Listing ADRUP 
Moduleigenschaften 
aufgerufene Module: ce J 
Flags: 05 ENDE gewählt 


06 eingelegte Cassette ist Programm- 


cassette 
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Modifikation 

001 LBL_'"ADRUP'" - Name des Programmes mit dem Modul UP 
018, 061 |"ADRBE" - Name des Programmes mit dem Modul BE 
022, 071 |"ADRIN" - Name des Programmes mit dem Modul IN 
009, 027, |"A" - Name des residenten Programmfiles 

048 

012, 054 |"FA'" 

002, 040 |"a'" - Name des Datenregisterfiles 


3.1.4 a - Auswahl 


Aufgabe 


Mit dem Modul a werden Datensätze nach den in der Satzeingabe 
(Modul E) definierten Suchkriterien ausgewählt. Dabei können 
ein ganzes Datensatzfeld oder nur die für die Auswahl nicht 
relevanten Zeichenpositionen mit ? "ausgeblendet" werden 
(wild card). Ein ? am Ende eines Suchkriteriums steht für 
beliebige folgende Zeichen. Vor der Eingabe der Suchbegriffe 
ist der gesamte Datensatz mit ? winitialisiert. Die Plausibi- 
lität wird nicht überprüft, die programmierten Abkürzungen 


können nicht verwendet werden. 


Es ist auch möglich, alle Sätze zu selektieren (ALLE SAETZE) 
oder die Rollen der ausgewählten und der noch nicht selektier- 
ten Datensätze nach der Auswahl zu vertauschen (AUSTAUSCH). 


Die Datensatznamen der selektierten Sätze werden im Inhalts- 
verzeichnis I ausgewählt markiert. Diese Markierung kann nur 
durch INITIALISIEREN bei der Neuaufnahme (vgl. 3.1.12), bei 
der Auswahl oder beim Löschen (vgl. 3.1.10, REPARATUR) sowie 
durch AUSTAUSCH (s. o.) entfernt werden. 
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«> 
1: Are Serzen 


alle DSN 
alle Sätze? T ausgewählt 
markieren 
F 
EB 


IIEHREZEI 
15: "ausrausen" || 
(TE: FSUCHBEGRIFFE" || 
IEZI 


DSN- 
Kriterium 


enthält ein 
ar Er 


ausgewählt markierte DSN 
demarkieren, nicht aus- 
gewählt markierte DSN 

ausgewählt markieren 


ZAUS := ZTOT - ZAUS 


alle passenden nicht 
markierten DSN vor- 
ausgewählt markieren 


DSN 
gefunden F (66) 


Bild 3-7/1 Ablaufplan a 


30 3 Software 


ersten bzw. nächsten 
vorausgewählt markier- 
ten DSN suchen 


ersten bzw. nächsten 
nicht markierten 
DSN suchen 


DSN: DCASS >V 
AZEICHEN: =erstes in A 


entsprechenden DSN VZEICHEN:=erstes in V 
ausgewählt markieren 


ZAUS := ZAUS + 1 


entsprechenden DSN 
demarkieren 


existiert 
? 


AZEICHEN 


DCASS: Datencassette =VZEICHEN 
? 


Bild 3-7/2 Ablaufplan a 


3.1.4 a - Auswahl 31 


AZEICHEN (VZEI- 
CHEN) := erstes 
des nächsten 
Feldes in A (V) 


Bild 3-7/3 Ablaufplan a 


Moduleigenschaften 


aufrufendes Modul: m 

aufgerufene Module: mDEIJK 

working file: I 

Datenregister: 04 Zeiger auf AZEICHEN und VZEICHEN 
Flags: 07 AUSTAUSCH gewählt 


09 AZEICHEN ist letztes des Feldes 
10 mindestens ein Datensatz ist vor- 
ausgewählt 


32 


236+LBL “a” 
237 "ALLE SAETZE” 
238 XEQ "J" 
239 Key? 
248 GTO 14 
241 "I" 
242 CLA 
243 SEEKPTA 
244 RCL 88 
245 STO 61 
246 RCL b 
247 "4" 
248 POSFL 
249 %(0? 
258 GTO "* 
251 SIGH 
252 DELCHR 
253 "Hr 
254 INSCHR 
239 KOY 
256 STO b 


2y7+LBL 14 
258 XER "1" 
259 RCL 14 
268 XEB "D" 
261 "AUSTAUSCH“ 
262 XEQ "J" 
263 K=1? 
264 SF 87 
265 “SUCHBEGRIFFE” 
266 KEN "E* 
267 XEQ °K" 
268 "I* 
269 CLX 
276 SEEKPTA 
2rı CLA 
272 ARCL 85 
273 RCL 14 
274 POSA 
275 K#B? 
276 ©28? 
277 610 13 


278+LBL 65 
279 POSFL 
288 38? 

281 GTO 14 
282 SF 10 
283 GETREC 
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284 SICH 
285 CHS 
286 ARUT 
287 ATOK 
288 RCL 19 
289 xxY? 
298 GTO 85 
291 FI” 
292 DELREL 
293 INSREC 
294 CLA 
295 ARCL 85 
296 GTO 85 


297+LBL 86 
298 FE?C 87 
299 GTO "" 
308 RCL 19 
3ei 12 

302 RCL 88 
383 RCL 61 
384 - 

385 STO 81 

386 "I" 

367 CLX 

388 SEEKPTA 


309+LBL 67 
310 SF 25 
311 GETREC 
12 FC%C 25 
313 6T0 *" 
314 SICH 
315 CH$5 
316 AROT 
317 RDH 
318 ATOX 
319 x=Y? 
328 GTO #7 
321 REL Z 
322 X=Y? 
323 "H4" 
324 Kr? 
325 "Hk" 
326 DELREC 
327 INSREC 
328 RDN 
329 GTO 07 


330+LBL 14 


331 FC? 18 
332 GT0 86 
333 "I" 
334 CLX 
335 SEEKPTA 
336 GTO 13 


33T+LBL 88 
338 CF 89 
339 I" 

340 FLSIZE 


341eLBL 13 
342 "k° 
343 FS? 18 
344 "1" 
345 POSFL 
346 %8? 
347 GTO 86 
348 INT 
349 SEEKPT 
358 GETREC 
351 ARCL 38 
352 GETAS 
353 CLX 
354 STO 04 


355+LBL 89 
356 “A” 

357 SF 25 
356 SEEKPTA 
359 FS?C 25 
369 GTO 89 
361 SICH 
362 ST+ 81 
363 35 

364 GT0 14 


365+LBL 89 
366 GETREE 
367 SICH 
368 ALENG 
369 x=Y? 
378 SF 89 
371 RCL 14 
372 ATOK 
373 %=Y? 
374 GT0 13 
375 RCL 84 
376 "vr 
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377 SF 25 
378 SEEKPTA 
379 GETREC 
388 FC?C 25 
381 GTO 89 
362 CLX 

383 ATOX 
394 XrY? 
385 GTO 89 
386 ALENG 
387 X=8? 
388 GTO 13 
389 FC’ 89 
398 CTO 12 


391+LBL 69 
392 FC? 10 
393 GTO 88 
394 RCL 19 


3I5+LBL 14 
396 "I" 
397 RCLPTA 
398 RL 86 
399 - 

488 SEEKPT 
481 SICH 
482 DELCHR 
483 KCdY 
484 CLA 
485 ATOA 
486 INSCHR 
487 GT0 88 


4u8+LBL 13 
489 FE?C 89 
418 GT0 12 
411 SICN 
412 RCL 84 
413 INT 
414 + 

415 STO 84 
416 GTO 89 


417+LBL 12 
418 RCL 86 
419 ST+ 84 
428 RCL 04 
421 CT0 09 
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Besonderheiten 


Da die Sätze auf der Datencassette unter ihren Datensatznamen 
gespeichert sind, ist die Selektion über das entsprechende 
Feld (NACHNAME1) besonders effizient. Deshalb werden in den 
Zeilen 272 bis 296 erst die Datensätze vorausgewählt, deren 
Datensatznamen passen. Bei der Abklärung der restlichen Feld- 
inhalte werden nur noch diese vorselektierten Sätze berück- 
sichtigt. Wurde das Suchkriterium für den Datensatznamen nicht 
explizit angegeben, also entweder gar nicht oder mit einem ? 

unter den für den Datensatznamen relevanten Zeichen eingege- 
ben, muß jeder Datensatz der Cassette mit den Suchbegriffen 


verglichen werden. 


Modifikation 


250, 299,|GTO_"A'" - Name des residenten Programmfiles 
313 


3.1.5 &ä - Ändern 


Aufgabe 


Mit dem Modul ä werden die Inhalte der ausgewählten Datensätze 


abgeändert. Dies kann auf zwei Arten geschehen: 


-— AUTOMATISCH: die Änderungen - sie können bei Zahlen auch re- 
lativ angegeben werden - werden einmal abgefragt (Modul E) 
und bei allen ausgewählten Datensätzen einheitlich durchge- 
führt. Nicht zu ändernde Datensatzfelder oder einzelne Zei- 
chenpositionen werden - ähnlich wie bei der Auswahl (vgl. 
3.1.4) - mit ? von der Änderung ausgenommen. Vor der Defi- 
nition der Änderungen sind alle Datensatzfelder mit ? ini- 
tialisiert. Es werden weder die programmierten Abkürzungen 


ersetzt noch die Plausibilität überprüft. 
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-— nicht AUTOMATISCH: die ausgewählten Datensätze werden suk- 
zessive wie bei der Neuaufnahme zur interaktiven Änderung 
angeboten (Modul E). Das Modul P (Plausiblitätskontrolle und 


programmierte Abkürzungen) wird aufgerufen. 
In beiden Fällen ist die Änderung des Datensatznamens 


(NACHNAME1) nicht möglich. Hierzu ist der betreffende Daten- 
satz zu löschen und mit neuem Datensatznamen einzugeben. 


Moduleigenschaften 


aufrufendes Modul: m 

aufgerufene Module: mDEF)JP 

working file: I 

Datenregister: 04 Zeiger auf AZEICHEN und VZEICHEN 
Flags: 07 RELATIV gewählt 


09 AZEICHEN ist letztes des Feldes 


Besonderheiten 


Bei automatischen relativen Änderungen werden die Zahlenwerte 
mit ANUM und INT - bei FIX_O, CF_28 und CF_29 - ermittelt. So- 
lange immer ganze Zahlen verwendet werden, treten keine Kon- 
vertierungsprobleme auf. Enthält ein zu änderndes Feld keine 
Zahl, bleibt es unverändert. Es wird jeweils nur der erste nu- 
merische Wert eines Feldes geändert und der restliche Feldin- 
halt gelöscht. 


Bei der manuellen Änderung wird ein Datensatz nur dann auf die 
Cassette zurückgeschrieben, wenn er tatsächlich verändert wur- 
de. 
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| 3: "AUTOMATISCH" || 


automatisch? (09) 


ersten bzw. nächsten 
ausgewählt markier- 
ten DSN suchen 


HEBRES TEUER 
D: =] 


gefunden? 


E: "AENDERUNGEN" 
keine Anderung bei DSN 


ersten bzw. nächsten 
ausgewählt markier- 
ten DSN suchen 


DSN: DCASS'> V 
DSN: A »DCASS 
Dam Fr 


Bild 3-9/1 Ablaufplan ä DCASS: Datencassette 
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AFELD (VFELD) 
!= nächstes 
Feld in A (V) 


enthält 


Zahl? 


Bild 3-9/2 Ablaufplan ä 


3.1.5 ä - Ändern 37 


AZEICHEN (VZEICHEN) := erstes Zeichen in A (V) 


AZEICHEN (VZEICHEN) 
ı= erstes des näch- 
sten Feldes in A (V) 


AZEICHEN (VZEICHEN) 
:= nächstes in AM 


Bild 3-9/3 Ablaufplan ä 


?S+LBL "ü” 

76 "I" 

77 CLA 

78 SEEKPTA 
79 "AUTOMATISCH" 

88 XER ")" 

Bl x=1? 

82 CTO 14 


B3+LBL 88 

84 XEQ 11 

65 ARCL 28 
86 GETAS 

87 XEQ 13 
88 FE?C 85 
89 GTO 88 
98 XER "P“ 
91 RCL 89 
92 XER 12 
93 GTO 08 


94+LBL 14 
95 "RELATIV" 
96 KER "J" 

97 %=7? 

98 SF 87 
99 RCL 14 
188 KEO "D" 
181 XEQ 13 
182 GTO 14 


183+LBL 13 

194 "AENDERUNGEN“ 
185 SF 86 
186 XER "E" 
187 CF 86 
188 RTN 


189+LBL Bl 

118 "A" 

111 SEEKPTA 
112 GTO 13 
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t13+LBL 82 
114 °A” 
115 RCLPTA 


ti6+LBL 13 
117 SF 25 
118 GETREC 
119 FCRC 25 
129 CTO 83 
121 ANUM 
122 FE9C 22 
123 6TO 82 
124 INT 

125 RCLPT 
126 INT 

127 °Y° 

128 SEEKPTA 
129 GETREC 
138 KOY 
131 ANUN 
132 FÜRC 22 
133 GTO 82 
134 INT 

135 + 

136 CLA 

137? ARCL& 
138 RDN 

139 SEEKPT 
148 DELREC 
141 SF 25 
142 INSREC 
143 FC?C 25 
144 GTO 13 
145 6T0 82 


146+LBL 83 
147 RCL 16 
148 XEO 12 


149+LBL 14 
158 XEQ 11 
151 ARCL 38 
152 GETAS 
153 CLX 


154 FS? 87 
155 GT0 81 
156 STO 84 


157+LBL 84 
158 "A" 

159 SF 25 
168 SEEKPTA 
161 FERT 25 
162 GTO 83 
163 GETREC 
164 SICH 
165 ALENG 
166 K=Y? 
167 SF 89 
168 RCL 14 
169 ATOX 
178 %=7? 
171 GT0 84 
172 RCL 04 
173 7° 

174 SF 25 
175 SEEKPTA 
176 FÜ?C 25 
177 GTO 84 
178 KOdY 
179 CLA 

188 &TOA 
181 SF 25 
182 INSCHR 
183 FE%C 25 
184 GTO 13 
185 SICN 
186 DELCHR 
187 FC? 89 
188 GTO 14 
189 RCLPT 
198 SF 25 
191 SEEKPT 
192 FE%C 25 
193 GTO 84 
194 GETREC 
195 SEEKPT 
196 ALENG 
197 DELCHR 
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198+LBL 84 
199 FC9C 89 
208 GTO 14 
281 SICH 
202 RCL 84 
283 INT 

204 + 

205 STO 84 
206 GTO 84 


207+LBL 13 
208 2 
289 GTO °F" 


2i8eLBL 14 
211 RCL 86 
e12 ST+ 84 
213 RCL 84 
214 GTO 04 


215+LBL 12 
216 "I" 
217 RCLPTA 
218 INT 
219 SEEKPT 
229 CLA 

221 ARCL IND Y 
222 ARCLREC 
223 SAYERS 
224 RTN 


225eLBL 11 
226 "I" 
227 FLSIZE 
228 "4 
229 POSFL 
230 (0? 
23 TO °" 
232 INT 
233 SEEKPT 
234 GETREC 
235 RTN 


3.1.6 c - Cassettenwechsel 39 
ee el == 42 21] „AE12 10.2) 2ER EEE EEE. \ 


Modifikation 


231 GTO_"A' - Name des residenten Programmfiles 


3.1.6 c - Cassettenwechsel 


Aufgabe 


Das Modul c dient zum programmgesteuerten Wechsel der einge- 
legten Cassette. Mit REWIND und CASS. WECHSELN wird der 


Benutzer zu den entsprechenden Aktionen aufgefordert. 


Moduleigenschaften 


aufrufende Module: m IN UP K 
aufgerufene Module: m S 
Parameter IN: Flag 07 ohne Schreib-/Leseoperationen 


Flag 10 Rücksprung mit RTN 
working file: I (nur wenn Flag 07 gelöscht ist) 


Besonderheiten 


Das Modul hat einen ambivalenten Charakter: es kann einerseits 
als Anwendermodul vom Menu aus aufgerufen werden, wird jedoch 
andererseits auch als internes Modul (von IN, UP und K) ver- 
wendet. Je nach Status des Flags 10 erfolgt ein Rücksprung zum 
Menu (GTO_"A") oder zum aufrufenden Modul (RTN). Ist Flag 07 
gelöscht, werden das Inhaltsverzeichnis I sowie die Zahlen 
ZTOT und ZAUS auf die "alte" Cassette geschrieben und - neben 
KUNT und KOBE - von der "neuen" Cassette geladen. Im anderen 
Falle (Aufruf durch die Module IN und UP) ist nur ein Rück- 
sprung mit RTN möglich. 
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c 
mit/ohne Speicherung 
RIN/zurück zu Menu 


mit 

SESUEHFFUNS T9LBL *c* 
80 FC? 07 
81 XEQ "5" 
82 "REWIND“ 
83 AVIEN 
84 BEEP 

85 PSE 

86 PSE 

87 CLX 

88 KOF 

89 SICH 


| warten bis CASS zurückgespult gBrLBL 87 


91 INSTAT 

92 %0? 

93 GTO 82 
94 -CASS. WECHSELN“ 


@&) 95 AYIEN 
96 BEEP 


€ 
warten bis neue CASS positioniert on 


99 23 

188 x#Y? 
181 GTO 83 
182 CLD 

183 LAST 
184 KOF 
185 FS?%C 87 
186 RTN 

197 "* 

188 3 E-3 
189 SEEKR 
118 READRK 
111 I 

112 SF 25 
113 GETAS 
114 CF 25 
115 FC?C 186 


116 670 "* 
(D)CASS: (Daten-)Cassette 117 RTH 


DMEM : Datenspeicher 
XMEM : Extended Memory 


"REWIND" 


"CASS. WECHSELN" 


mit 
Speicherung 
? 


ZTOT ZAUS KUNT KOBE: DCASS + DMEM 
I: DCASS + XMEM 


Bild 3-11 Ablaufplan c Bild 3-12 Listing c 


3.1.7 d - Drucken 41 


Die Tätigkeiten des Benutzers am Cassettenlaufwerk werden mit- 
tels INSTAT kontrolliert. Das Laufwerk muß deshalb die erste 
Einheit der IL-Schleife sein. 


Die Anweisungen 112 SF_25 und 114 CF_25 vermeiden die Fehler- 
meldung FL_TYPE_ERR beim GETAS eines noch leeren Inhaltsver- 
zeichnisses I, das ja in diesem Fall noch den Typ DA-File hat. 


Modifikation 
107 "a' - Name des Datenregisterfiles 
116 GTO_"A'" - Name des residenten Programmfiles 


3.1.7 d - Drucken 


Aufgabe 


Das Modul d gibt die ausgewählten Datensätze auf dem Drucker 
aus. Das Format wird mit der Satzeingabe (Modul E) definiert. 
Soll ein Feld gedruckt werden, ist an der ersten Stelle des 
entsprechenden Formatfeldes ein D einzugeben. Folgende For- 


matanweisungen können zusätzlich angegeben werden: 


N das Feld wird in eine neue Zeile gedruckt 
5-2, as das Feld wird nach 1, 2, ... Zeilenvorschüben ge- 
druckt. 


An zweiter oder dritter Stelle können stehen: 


I die Formatanweisung wird auch bei leerem Feld aus- 
geführt 
d der Feldinhalt wird in Breitschrift (SF_12) ausge- 


geben. 


42 3 Software 


Die Reihenfolge der Da- 
tensatzfelder kann nicht 


verändert werden. 


Die Ersatzdarstellungen 


E: "FORMAT" 
J: "SCHNELL" 


für B und die Umlaute 
werden umgewandelt. 


Mit SCHNELL werden die 
Datensatzinhalte so aus- 
gedruckt, wie sie in der 
Anzeige dargestellt wer- 


den. Da hierbei die Er- 


J: "NUR GROSS" 


satzdarstellungen und 
die Präfixe für Groß- 
buchstaben nicht berück- 


sichtigt werden, erfolgt 


die Ausgabe wesentlich 
ersten bzw. nächsten ausge- 
FR markierten DSN suchen NER 


Mit dem IL-Drucker 
HP-82162A wird im PARSE- 
Mode gedruckt. Zu Beginn 


der Dateibearbeitung 


DSN: DCASS + V 
AFELD (VFELD) := erstes in A (V) 
VZEICHEN := erstes in V sprechende Escape-Se- 


(Modul m) wird die ent- 


quenz an den Drucker ge- 


(13) (©) (I) schickt. 


AFELD := nächstes Feld in A, das 
"D" enthält, VFELD entsprechend 


AFELD 


existiert 
? 


DCASS: Datencassette 


Bild 3-13/1 Ablaufplan d 


3.1.7 d - Drucken 43 


—ı 


VZEICHEN := erstes in VFELD 


AFELD 
enthält 
"TN? 


AFELD 
enthält 
"q!? 


Breitschrift 


Normalschrift 


AFELD 
enthält 
Zahl? 


neue Zeile und 
entsprechende Zahl 
Zeilenvorschübe 


enthält 
"N? 


neue Zeile 


Bild 3-13/2 Ablaufplan d 
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ist das erste 
zu druckende 


"> Drucker 


VFELD »-Drucker 


2 VZEICHEN 
+ Drucker 


Kleinschrift 


Bild 3-13/3 Ablaufplan d 


91.7 d- Drucken 77 a 


Großschrift 
VZEICHEN := nächstes in V 


VZEICHEN := 
"at bzw. man 


VZEICHEN := 
"50 bzw. nö 


VZEICHEN := 
ij DZW. nie 


Groß- 
schrift 


CHEN Sonder- 
zeichen 
? 


VZEICHEN := 'S" 


VZEICHEN := "ß" 


Bild 3-13/4 Ablaufplan d 
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B2+LBL "d* 
83 RCL 11 
84 XEQ "DB" 
85 "FORMAT* 
&6 XEQ "E“ 
07 SCHNELL“ 
88 KXEQ "J" 
69 x=Y? 
18 SF 1@ 
11 x=7? 
12 GTO 14 
13 "NUR GROSS“ 
14 XEQ "J" 
15 %=7? 
16 SF 87 


I?+LBL 14 
18 SF 21 
19 "1° 

28 CLX 

21 SEEKPTA 
22 PREUF 
23 SF 09 
24 GTO 14 


25+LBL 88 
26 "I" 
27 RCLPTA 


2B+LBL 14 
29 hr 

38 POSFL 
31 8? 
32 GT0 14 
33 INT 

34 SEEKPT 
35 GETREC 
36 ARCL 38 
3? GETAS 
38 CLX 

39 STO 85 
48 GTO 13 


41+LBL 14 
42 PRBUF 
43 PRBUF 
44 PRBUF 
45 PRBUF 
46. PRBUF 
47 GT0 "" 
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4eLBL 8 
49 CLX 
38 SICH 
s1 $T+ 85 
32 RCL 85 


S3eLBL 13 
54 CF 88 
99 °A” 

36 SF 25 
5? SEEKPTA 
se "D" 

39 POSFL 
68 FS?%C 25 
61 88? 

62 GTO 88 
63 STO 85 
64 GETREC 
65 ASTO 84 
66 "V" 

6? SEEKPTA 
68 GETREC 
69 RÜL 11 
78 ATOX 

1 x? 

72 SF 88 
73 RCL 15 
74 x=7? 

75 SF 88 
756 CLA 

7? ARCL 84 
78 FC? 08 
79 GTO 14 
80 RCL 24 
81 POSA 
82 8<0? 
83 GTO 81 


B4+LBL 14 
85 RCL 27 
86 POSA 
97 SF 12 
88 xX0? 
89 CF 12 
98 ANUN 
9 FE 22 
92 GTO 14 
93 PRBUF 
94 RCL b 
95 PRBUF 


96 DSE Y 
97 STO b 
98 CTO 13 


99LBL 14 
186 REL 25 
181 POSA 
182 x(0? 
183 CTO 14 
184 PRBUF 
185 GTO 13 


186+LBL 14 
187 FS? 08 
188 GT0 @1 
189 RCL 11 
118 FC?C 89 
111 ACCHR 


t12eLBL 13 
113 FS? 08 
114 GTO 61 
115 "v° 
16 RCL 05 
117 SEEKPTR 
118 GETREC 
119 FC? 18 
128 GT0 14 
121 ACA 
122 GT0 81 


t23+LBL 82 
124 ACCHR 


125+LBL 14 
126 CF 13 
127 FC? 07 
128 SF 13 
129 RCL 28 
138 ATOX 
131 X=8? 
132 GTO 81 
133 K#Y? 
134 GTO 14 
135 CF 13 
136 ATOX 


137+LBL 14 
138 RCL 26 
139 x=Y? 


Software 


148 GTO 14 
141 CLX 
142 RCL 89 
143 X=Y? 
144 GT0 13 
145 CLX 
146 RCL 18 
147 X=Y? 
148 6T0 12 
149 CLX 
138 RCL 18 
151 X=Y? 
152 GT0 11 
133 CLX 
154 RCL 15 
155 XOY 
156 X#Y? 
157.97? 
158 CF 13 
159 RUL 21 
168 KOdY 
16 %Y? 
162 CF 13 
163 CTO 82 


164+LBL 14 
165 21 
166 GTO 14 


167+LBL 13 
t6B 23 
169 GTO 14 


179+LBL 12 
171 235 


172+LBL 14 
173 SICH 
174 F5? 13 
175 ST+ L 
176 LASTX 
177? CTO 82 


178+LBL II 
179 5 

186 FS? 13 
181 GT0 82 
182 83 

183 ACCHR 
184 GT 82 


3.1.8 _e - Ende der Dateibearbeitung 47 


Moduleigenschaften 


aufrufendes Modul: m 
aufgerufene Module: mDEJ 
working file: I 


Datenregister: 04 AFELD 
05 Zeiger auf AFELD und VFELD 


Flags: 07 NUR GROSS gewählt 
08 VFELD ist leer 
09 erste Zeile des Datensatzes 
10 SCHNELL gewählt 


Besonderheiten 


Die Zeilen 043 bis 046 dürfen nicht durch ADV ersetzt werden, 
da sonst die letzten Zeilen der Ausgabe rechtsbündig gedruckt 
werden. Dieser Effekt tritt beim HP-82162A wegen seines rela- 


tiv großen Buffers auf. 


Modifikation 


047 GTO_"A" - Name des residenten Programmfiles 


3.1.8 e - Ende der Dateibearbeitung 


Aufgabe 


Das Modul e ermöglicht eine kontrollierte Beendigung der Da- 
teibearbeitung. Das Inhaltsverzeichnis I sowie die Zahlen ZTOT 
und ZAUS werden auf die Cassette geschrieben. Der Programmlauf 
endet mit MEMORY_LOST. 
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?I+LBL "e" 
76 XER "5" 
77 STOc 
MEMORY LOST 78 STOP 
Bild 3-15 Ablaufplan e Bild 3-16 Listing e 


Moduleigenschaften 


aufrufendes Modul: m 
aufgerufenes Modul: S 


3.1.9 i - Inhaltsverzeichnis 


Aufgabe 
Das Modul i gibt die nicht gelöschten Datensatznamen der ein- 


gelegten Cassette mit ihren Markierungen aus. Dieses Inhalts- 
verzeichnis kann auch ausgedruckt werden (AUSDRUCK). 


Moduleigenschaften 


aufrufendes Modul: m A 
working file: I 
Besonderheiten 


Der CODE wird in eine Zahl zwischen 45 und 255 umgewandelt, 
die ausgewählt-Markierung mit AUS ausgegeben. 


3.1.9 i — Inhaltsverzeichnis 49 


44B+LBL "i" 
449 XEQ "A" 
458 "I" 
451 CL 
452 SEEKPTA 


453+LBL iO 
454 SF 25 
455 GETREC 
456 CLD 
457 FS2C 25 
458 GTO 14 
459 ADY 

468 ADY 

461 ADY 
462 ADV 
463 GTO "" 


ersten bzw. näch- 
sten DSN suchen 


Papiervorschub 


464+LBL 14 
465 6 

466 AROT 
467 44 

468 ATOX 
469 - 

478 ARCL X 
471 ATOX 
7212 

473 8-7? 
474 GTO 10 
475 [LA 
476 35 

477 x=1? 
478 °F AUS” 
479 F5? 21 
488 PRA 
481 FS? 21 
482 GT0 18 
483 TONE 8 
484 AYIEN 
485 PSE 
486 GTO 18 


DSN und CODE 


DSN 


ausgewählt mar- 
N 


Bild 3-17 Ablaufplan i Bild 3-18 Listing i 


50 3 Software 
Modifikation 
463 GTO_"A'" - Name des residenten Programmfiles 


2 


| 3: "IM DIALoc“ || 


© 


ersten bzw. nächsten ausge- 
wählt markierten DSN suchen 


En 
T 


Dialog? 


CODE umwandeln 
| J: DSN und CODE 


DSN gelöscht markieren 
ZTOT := ZITOT - 1 
ZAUS := ZAUS - 1 


Bild 3-19 Ablaufplan 1 


© 
DS reraanon ] 


Reparatur? 


IE 


ersten bzw. näch- 
sten gelöscht mar- 
kierten DSN suchen 


gefunden? 


Fra) 


T 


DSN ausgewählt markieren 
ZTOT := ZTOT + 1 
ZAUS := ZAUS + 1 


3.1.10 1 — Löschen 51 


3.1.10 1 - Löschen 


Aufgabe 


Mit 1 können ausgewählte Datensätze gelöscht werden - entweder 
alle automatisch oder einzelne interaktiv (IM DIALOG). Die Da- 
tensätze werden nur logisch gelöscht, d. h. der Datensatzname 
wird im Inhaltsverzeichnis I gelöscht markiert. Solange der 
Datensatz auf der Cassette nicht durch einen neuaufgenommenen 
überschrieben wurde, bleiben die gelöschten Daten - physisch - 
erhalten. Die REPARATUR-Routine nimmt alle seit der Initiali- 
sierung der Cassette gelöschten und noch nicht überschriebenen 
Datensätze wieder auf. Sie sind dann ausgewählt und können 


wieder gelöscht werden. 


185+LBL "1" 288 GTO 14 216 SEEKPT 238 XEQ "1" 
186 "IM DIALOG" 281 STD 84 231 CLX 
187 XER "J" 202 INT el7+LBL 14 232 SEEKPT 
188 %=Y? 263 SEEKPT 218 SICK 233 RÜL b 
189 SF 89 284 GETREC 219 DELCHR 234 "p" 
198 *I* 205 6 228 “p“ 235 POSFL 
191 CLX 286 AROT 221 INSCHR 236 %(0? 
192 SEEKPTA 207 44 222 ST- 98 237? 610 "" 
288 ATOX 223 ST- Ol 238 SICH 
193+LBL 03 289 - 224 GTO 83 239 DELCHR 
194 °P 218 ARCL X 240 "4" 
195 POSFL 211 ATOX 225eLBL 13 241 INSCHR 
19% FERC 27 212 HER "J" 226 "REPARATUR" 242 ST+ 88 
197 x<8? 213 X#Y? 227 XEQ ",J" 243 $T+ 61 
198 GTO 13 214 GTO 83 228 XV? 244 KOY 
199 FC? 69 215 RCL 84 229 GTO "" 245 STO b 
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52 3 Software 


Moduleigenschaften 


aufrufendes Modul: m 

aufgerufene Module: mIJ 

working file: I 

Datenregister: Zeiger auf DSN 

Flag: 09 IM DIALOG gewählt 
Modifikation 

229, 237 |STO_"A" - Name des residenten Programmfiles 


3.1.11 m - Menu 


Aufgabe 


Das Modul m zeigt die Kennung der eingelegten Cassette sowie 
die Funktionen des Systems an. Der Benutzer wählt eine aus, 
indem er JA eingibt. Alle Funktionen - außer ENDE, das den 
Programmlauf mit MEMORY_LOST beendet - kehren zum Menu zurück. 


Läuft das Menu zweimal ohne Auswahl einer Funktion ab, werden 
der Rechner und die IL-Einheiten im STANDBY-Modus abgeschal- 
tet. Ein Druck auf die ON-Taste reaktiviert das System. Mit 
der USER-Taste erreicht man den Anfang des Menus. 


Moduleigenschaften 


Moduiname für Aufruf: Name des residenten Programmfiles 
aufrufende Module: BEaäcdilnpzF 
aufgerufene Module: aäcdeilnpzJ 

Flag: 08 erster Durchgang des Menus 


3.1.11 m — Menu 53 


Drucker: PARSE-Mode 
14: ZIEL, TEXT 
) T 


"CASSETTE'", KUNT, '"-", KOBE F 


USER 
gedrückt 
? 


| 14: "n", "NEUAUFNAHME" | 


|| 14: "a", "Auswahl" ] => 
j 


l 14: at, "AENDERN'' | 


| 24: "1", "LOESCHEN" |] 
| 34: "a", "DRUCKEN" || 
|| 14: "z", "ZAEHLEN" | 


| 24: "i", "INHALT" || 


| 14: "p", "PROGRAMM" |) 
| 14: "ec", "CASSETTE" |] 


l 14: Net, NENDE'" | 


er- 
ster Durch 
gang? 


E IL abschalten OFF 
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ei "" 19 REL 82 39 "cCASSETTE” 58 CLA 
02 READSUB 28 XTOA 48 3ER 14 59 LASTK 
21 TONE 8 41 “eENDE” 68 XTOA 
B3+LBL 88 22 PSE 42 xEQ 14 61 ASTO X 
84 2 23 “nHEURUFNAHNE“ 43 FS?C 88 62°" 
85 SELECT 24 XEQ 14 44 CTO Bi 63 GTO IND & 
86 "E&KIH" 25 "anUSWAHL“ 45 SF li 
7 0UTA 26 KEG 14 46 PHRDN IB6+LBL "1" 
08 SICH 27 "anENDERN” 47 OFF 387+LBL "d" 
89 SELECT 28 XEQ 14 48 GTO 98 389+LBL "pP" 
29 "ILOESCHEN* 389 "h” 
18+LBL "" 30 Ed 14 49+LBL 14 
11 RCL 31 31 "DRUCKEN" sa FS?C 27 390+LBL "n“ 
12 STOFLAG 32 XEQ 14 si 6T0 #1 391+LBL "a” 
13 AON 33 *zZAEHLEN” se ATOX 392+LBL "a" 
34 %E0 i4 33 SIGN 393+LBL "z“ 
14+LBL Bi 35 "iINHALT“ 54 KER "J" 394+LBL "i" 
15 "CASSETTE " 36 XE9 14 3 887? 395 F* 
16 RCL 83 37 "pPROGRANN“ 36 RTN 396 READP 
1? &T0R 38 XEO 14 37 CF 27 397 GTO IND & 
18 °h-" 


Bild 3-22 Listing m 


Besonderheiten 


Zu Beginn der Dateibearbeitung wird das transiente Programn- 
file AA mit 002 READSUB gelesen, ohne das residente File A zu 
überschreiben. Die transienten Programmfiles AA und AAA werden 
bei Bedarf mit 396 READP hinter das Programm A geladen und er- 
setzen dort das jeweils andere transiente File. Da globale La- 
bels vom permanenten .END. aus in Richtung fallender Zeilen- 
nummern gesucht werden, werden die Labels der Zeilen 386 bis 
394 nur erreicht, wenn das entsprechende Programmfile noch 
nicht geladen ist. Die folgende Sprunganweisung 397 GTO_IND_X 
verzweigt dann zum Beginn der gewählten Funktion. 


3.1.11 m — Menu 55 


Mit den Befehlen der Zeilen 004 bis 009 wird der PARSE-Mode 
eines eventuell angeschlossenen IL-Druckers eingeschaltet. Die 
Anweisungsfolge ist ohne Wirkung, wenn die IL-Schleife nur ein 
Gerät (nämlich das Cassettenlaufwerk) enthält. 


Das Modul wird nicht mit m, sondern mit dem Namen des residen- 
ten Programmfiles (A) aufgerufen, an dessen Anfang es ja 
steht. 


Modifikation 

062 "an 

389,395  |["Fa" 

001 "AA" - Name eines transienten Programmfiles 


023-042, |Es können noch weitere Funktionsnamen bzw. Labels 
386-394 eingefügt werden 


B2+LBL "n" 22 6T0 14 41 348? 9 GT0 12 
83 RCL 15 23 CLX 42 6T0 14 68 RCL i1 
64 XEQ "D“ 24 SEEKPT 43 INT 61 CREATE 
05 KEQ "I" 25 RÜL Z 44 SEEKPT 62 FE9C 25 
06 "DATEN" 26 ISG 84 45 ARCLREC 63 GTO 14 
07 XEQ "E” 27 STO b 46h ;" 

08 3EQ "P” 28 E 47 RCL 17 64+LBL 13 
89 XEQ "K” 29 GT0 "F" 48 AROT 65 ARCL 13 
18 CLX 49 RENAME 66 RCL 17 
1 "17 30+LBL 14 38 ASHF 67 AROT 
12 SEEKPTA 31 ST- 88 51 ASHF 68 SAVERS 
13 RCL 12 32 ST- el 52 DELREC 69 6T0 "" 
14 STO 94 33 *p“ 33 INSREC 

15 RCL b 34 POSFL 34 GTO 13 7O+LBL 14 
16 CLA 35 CLA ?1 DELREC 
17 ARCL 05 36 ARCL 85 So+LBL 14 

18 RCL 04 37 RCL 84 56 SF 25 T2+LBL 12 
19 XTOR 38 XTOA 3? APPREC 73 3 

28 POSFL 39 "HE" 38 FC? 25 74 GTO °F" 
21 88? xt 


Bild 3-23 Listing n 


56 3 Software 


3.1.12 n — Neuaufnahme 


Aufgabe 


Mit dem Modul n wer- 


1] 


den Datensätze in 
die Datei aufgenom- 
men. Dabei werden 


E: "DATEN" || 


soweit möglich erst 


als gelöscht mar- 
kierte Datensätze 
überschrieben. Neue 
Datensätze sind au- 
tomatisch ausge- 
wählt. Soll nach der 
Neuaufnahme nur mehr 
auf die neuen Daten- 
sätze zugegriffen 
werden, sind die Da- 
tensatznamen zu INI- 
TIALISIEREN. Plausi- 
bilitätskontrollen 
werden durchgeführt, 
programmierte Abkür- 
zungen ersetzt (Mo- 
dul P). 


ZTOT ZTOT + 1 
ZAUS := ZAUS + 1 
neuen DSN ausge- 
wählt markieren 
ersten gelöscht mar- 
kierten DSN suchen 


Die Felder des Da- 


tensatzes sind vor 


der Eingabe mit t 


(Zeichen für noch zu 
ermittelnden Inhalt) 
initialisiert (Modul 
D). 


Bild 3-24/1 Ablaufplan n 


3.1.12 n - Neuaufnahme 57 


DCASS: Datencassette 


auf DCASS entspre- 

chenden Datensatz 
umbenennen 

DSN austauschen 


auf DCASS neuen 
Datensatz DSN 
erzeugen 


DSN: A>DCASS 


Bild 3-24/2 Ablaufplan n 


Moduleigenschaften 


aufrufendes Modul: m 
aufgerufene Module: mDEFIKP 
working file: A 


Datenregister: 04 CODE 


58 3 Software 


Modifikation 
069 GTO_"A'" - Name des residenten Programmfiles 
060 RCL_11 - Größe SX (Länge eines Datensatzes im Exten- 


ded Memory in Registern, vgl. 2.3.3) 


3.1.13 p - Programmierbare Funktion 
246+LBL "p” 


247 CT0 “* 
248 ENTER? 
Aufgabe 249 ENTER? 
258 ENTERt 
Das Modul p kann vom Anwender pro- 
grammiert werden. 333 ENTERt 
334 ENTER? 
335 ENTERt 
336 ENTERt 
Moduleigenschaften N: 
aufrufendes Modul: m 
aufgerufenes Modul: m Bild 3-25 Listing p 
Modifikation 


Das Modul p kann auch nachträglich geändert und mit dem Modul 
UP auf Programm- und Datencassetten kopiert werden. Die Puf- 
ferbytes (ENTERt) sichern eine konstante Länge (in Records) 
des entsprechenden transienten Files auf der Cassette, 


3.1.14 z - Zählen 


Aufgabe 


Das Modul z gibt die Zahlen ZTOT (Anzahl der Datensätze der 
eingelegten Cassette) und ZAUS (Anzahl der ausgewählten Daten- 
sätze) über die Anzeige oder den Drucker (AUSDRUCK) aus. 


3.1.14 z -— Zählen 59 


Moduleigenschaften 


aufrufendes Modul: m 


aufgerufene Module: m A 422+LBL "7" 
423 XER "A" 
424 "BATENSATZANZAHL* 
425 XEQ 14 
426 "TOTAL: * 
427 ARCL 88 
428 ER 14 
429 "AUSGEMREHLT: " 
438 ARCL 81 
431 XEQ 14 
432 CLD 
433 AV 
434 ADY 
435 ADY 
436 ADV 
437 GT0 *" 


""DATENSATZANZAHL" 


"TOTAL" und ZTOT 


"AUSGEWAEHLT" und ZAUS 
Papiervorschub 


438+LBL I4 
439 FS? 21 
448 PRA 
441 FS? 21 
442 RTN 
443 TONE 0 
444 AVIEN 
445 PSE 
446 PSE 
447? RTN 


Bild 3-26 Ablaufplan z Bild 3-27 Listing zZ 


Modifikation 


437 |GTO_"A" - Name des residenten Programmfiles 


60 3 Software 


3.2 Interne Module 


3.2.1 A - Ausdruck-Prompt 


Aufgabe 


Das Modul A fragt den Benutzer, ob die folgende Ausgabe (der 
Funktionen Inhaltsverzeichnis oder Zählen) gedruckt oder ange- 
zeigt werden soll und setzt das Flag 21 entsprechend. 


Moduleigenschaften 


aufrufende Module: iz 
aufgerufenes Modul: J 


3.2.2 c - Cassettenwechsel 


Siehe 3.1.6. 


487+LBL "A" 
488 "AUSDRUCK“ 
489 XEQ "J" 
499 X=Y? 
491 SF 21 
492 „END. 


J: "AUSDRUCK'|| 


Drucker bereit 


RETURN 


Bild 3-28 Ablaufplan A Bild 3-29 Listing A 


3.2.4 E - Datensatzeingabe 61 


3.2.3 D - Datensatzinitialisierung 


Aufgabe 


D initialisiert alle Felder des ASCII-Files A im Extended Me- 


mory mit einem bestimmten Zeichen. 


Moduleigenschaften 


aufrufende Module: aädn 

Parameter IN: Reg. X ASCII-Wert des Initialisie- 
rungszeichens (TEXT) 

working file: A 

Modifikation 

360 17 - Größe FA (Zahl der Datensatzfelder, vgl. 2.3.3) 


3.2.4 E - Datensatzeingabe 


Aufgabe 


Das Modul E gibt erst den übergebenen Text aus. Dann werden 


die Feldinhalte des ASCII-Files A mit den entsprechenden Feld- 


35I+LBL "D" 361 RCL b 
356 “A” 362 APPREC 
F ; 2 357 CLFL 363 DSE Y 
Die Felder von A mit TEXT füllen 358 CLA 364 STO b 
359 XTOR 365 RTN 
360 17 


RETURN 


Bild 3-30 Ablaufplan D Bild 3-31 Listing D 
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er] 
Ta: om] 


a wann] 


(BER 
ERREGT 
IEERETETTG 


derholen? 


F 
Dis Fzusamze ] 


Bild 3-32/1 Ablaufplan E 


3.2.4 E - Datensatzeingabe 63 


13: TEXT 


TEXT := TEXT + NUMMER 


TEXT := TEXT + '?" 


2 ohne 
Anderung des DSN und 
AFELD = DSN? 


gabe erfolg- 


TEXT und AFELD 


USER 


gedrückt 
? 


Bild 3-32/2 Ablaufplan E 


bezeichnungen ausgegeben. Während ein Feld angezeigt wird, 
kann es durch eine Eingabe des Benutzers überschrieben werden. 


Ein leer eingegebenes Feld wird durch (Blank) ersetzt, 


233+LBL "E* 


234 CF 65 
235 TONE 8 
236 PSE 

237 "A* 

238 FLSIZE 
239 SF 09 
248 GTO 14 


241+LBL 86 
242 Rt 

243 RCL 87 
244 STO 85 
245 SIGN 
246 CHS 
247 STO 84 
248 Kor 
249 WAHL“ 
256 XEQ 12 


2s1+LBL 97 


252 "AHREDE“ 


233 KEB 13 


254 "TITEL" 


255 XEU 13 


256 "VORNAME" 


257 XEQ 13 


258 “NACHNAME” 


239 XEQ 13 
268 1SG 85 


261 GTO 97 
262 "ZUSATZ" 
263 XEQ 12 

264 "STRASSE, NR." 
265 XEQ 12 
266 "PLZ" 
267 XEQ 12 
268 "ORT" 
269 XEQ 12 
270 RCL 88 
271 STO 05 
272 Kor 


273+LBL 88 
274 "FELD" 
275 XEQ 13 
276 I5G 85 
277 GTO 88 


era+LBL id 
279 RCL b 
289 RDN 

281 FS?C 89 
282 GTO 86 
283 XEQ "W* 
284 X=Y? 
295 GTO 86 
286 RTN 


267eLBL 13 
288 ARCL 05 


Bild 3-33 Listing E 


289+LBL 12 
298 CF 23 
2891 E 

292 ST+ 84 
293 RCL 16 
294 RCL 84 
295 SEEKPT 
296 F5? 86 
297 %Y? 
298 CTO 14 
299 "Fb: “ 
388 XEQ 13 
301 TONE 8 
382 AYIEN 
383 PSE 
384 CLD 
395 GTO 12 


386+LBL 14 
397 °F? * 
388 XEQ 13 
389 TONE 9 
310 AYIEN 
311 PSE 
312 FE? 23 
313 PSE 
314 FC? 23 
315 PSE 
316 CLD 
317 FS% 23 
318 XEQ 14 


3 


Software 


I19LBL 12 
328 KV 
321 FS%C 27 
322 STO b 
323 RTN 


324+LBL 14 
325 SF 65 
326 ALENG 
327 x=0? 
328.” " 
329 RDN 


33a+LBL II 
331 DELREC 
332 SF 25 
333 INSREC 
334 FS%C 25 
333 RTN 

336 2 

337 GIO "Fr 


339+LBL 13 
339 Rt 

340 RCL b 
341 ARCLREC 
342 FEX 17 
343 RTN 

344 ATOX 
345 RDN 

346 STO b 


Ein Druck auf die USER-Taste führt an das Ende der Satzeinga- 


be, wo gefragt wird, 
bestimmt, ob der Datensatzname 
kann oder nur angezeigt werden soll. 
dem aufrufenden Modul, 


Moduleigenschaften 


ufrufende Module: 


aufgerufene Module: FW 


aädnP 


ob sie wiederholt werden soll. Ein Flag 
(NACHNAME1) abgeändert werden 


Ein weiteres Flag meldet 


ob eine Eingabe erfolgte. 


3.2.4 E - Datensatzeingabe 65 


Parameter IN: ALPHA TEXT 

Flag 06 keine Änderung des DSN 

OUT: Flag 05 es erfolgte eine Eingabe 

working file: A 
Datenregister: 04 Zeiger auf AFELD 

05 NUMMER 
Flag: 09 Rücksprungadresse unbestimmt 
Besonderheiten 


Die Bedienungserleichterung durch die USER-Taste erfordert un- 
strukturierte Rücksprünge aus einem Unterprogramm. Da die 
Rücksprungadressen vorheriger Unterprogrammaufrufe (u. a. des 
Modulaufrufs) nicht verloren gehen dürfen, muß der Programm- 
zeiger im Statusregister b direkt manipuliert werden. Dies 
darf höchstens in der zweiten Unterprogrammebene stattfinden, 
da das Register b neben dem Programmzeiger nur zwei Rück- 
sprungadressen vollständig speichert. Das Statusregister a 
enthält ebenfalls drei komplette Adressen, eine Rücksprungad- 


resse ist auf beide Register aufgeteilt. 


Das Sprungziel ist die Zeile 280 RDN. Beim Aufruf des Modules 
(Flag 09 gesetzt) wird mit 279 RCL_b das Statusregister b in 
den Stack geladen und im folgenden meist im T-Register aufbe- 
wahrt. Die Zwischenspeicherung in einem normalen Datenregister 
hätte die Verfälschung der Adressen durch Normalisierung zur 
Folge. Mit den Anweisungen 321 FS?C_27 322 STO_b werden die 
Adressen wieder in das Register b geladen, sofern die USER-Ta- 
ste gedrückt wurde. Hinsichtlich Programmzeiger und Rück- 
sprungadressen der beiden untersten Ebenen ist damit der Sta- 
tus der Zeile 279 STO_b restauriert. Der Programmlauf wird mit 
der Anweisung 280 RDN fortgesetzt (Flag 09 ist nun gelöscht). 


In den Zeilen 338 bis 346 werden von der Feldbezeichnung vorne 
solange Zeichen abgeschnitten, bis der Rest mit dem entspre- 
chenden Feldinhalt in das ALPHA-Register paßt (24 Zeichen). 
Die Zeilen 330 bis 337 gehören auch zu dem Modul P. 


66 3 Software 
25ieLBL "E* 273 "NACHNANE“ 295 XEQ 12 316+LBL 14 
252 CF 85 274 XEQ 12 296 "TAKELUNG“ 317 RCL b 
253 TORE @ 297 xEQ 12 318 RDN 
254 PSE 275+LBL 87 298 “SEGELFL.* 319 FS%C 89 
255 "A" 276 -P“ 299 XEQ 12 328 GTÜ 86 
256 FLSIZE 277? XEQ 13 398 "LIEGEPL.” 321 XEB "W” 
257 SF 89 278 156 85 381 XEQ 12 322 X=1? 
258 GTO 14 279 GTO 07 392 "UNT.“ 323 GTO 66 
288 "STRASSE, HR.” 303 KER 11 324 RTN 
259+LBL 86 281 KEQ 12 394 "UKH-" 
268 Rt 282 "PLZ" 385 XEQ 11 325eLBiL 11 
261 RCL 97 283 XEQ 12 396 "IOR” 326 "FZEICHEN" 
262 STO 65 284 "ORT" 387 XEQ 12 327 GT0 12 
263 SICH 285 XEQ 12 388 RCL 88 
264 CHS 286 "BOOTSTYP“ 399 STO 85 328+LBL 13 
265 STO 84 287 XEQ 12 31a ROY 329 "+.FELD" 
266 KOY 288 "LAENGE VER” 338 ARCL 85 
267 "BOOTSHANE” 289 XER 12 3il+LBL 88 
268 XER 12 298 "BREITE VER“ 312 "B* 331+LBL 12 
269 "ANREDE" 291 3EQ 12 313 XEQ 13 332 CF 23 
278 XEQ 12 292 "LAENGE HL” 314 1SG 05 333 E 
271 "VORNAME“ 293 XEQ 12 315 GTO 88 334 ST+ 84 
272 XEQ 12 234 "TIEFGANG* 335 RCL 16 
Bild 3-34 Listing E (YACHT-System) 
Modifikation 
249-277, |Hier können beliebige Feldbezeichnungen und 'Algo- 
287-288 rithmen zur platzsparenden Programmierung derselben 
eingesetzt werden, solange die Routine 289 LBL_12 
höchstens die zweite Unterprogrammebene belegt und 
das zwischengespeicherte Statusregister im T-Regi- 
ster steht. Bild 3-34 zeigt einen Ausschnitt aus dem 
komplizierteren E-Modul des YACHT-Systems (zur Ver- 
waltung der Daten eines Yachtclubs). 
312-315 die Anzahl der Anweisungsfolgen FC?_23 PSE ent- 


spricht dem Zeitraum, in dem ein Feld angezeigt wird 


und überschrieben werden kann. 


3.2.5 F — Fehlermeldung 67 


3.2.5 F - Fehlermeldung 


Aufgabe 


Tritt während des Programmlaufes 
aufgrund der Daten ein Fehler auf, 
wird die Fehlernummer mit einem 
Alarmsignal ausgegeben. Nach der 
Eingabe eines beliebigen Zeichens 
wird das Programm im Menu fortge- 
setzt. Systemfehler (OUT_OF_PAPER, 
TRANSMIT_ERROR, BAT) werden nicht 
abgefangen, Die Fehlernummern haben 
folgende Bedeutungen: 


- 1: zu viele gleiche Datensatzna- 
men 
Es wurde versucht, mehr als 
211 Datensätze mit gleichen 
Datensatznamen zu speichern. 
Abhilfe: Löschen eines Daten- 
satzes dieser Gruppe oder Wahl 
eines anderen Datensatznamens, 
- 2: Überschreitung der Datensatz- 
kapazität 
Es wurde versucht, einen Da- 
tensatz mit mehr als SK Zei- 
chen (Datensatzkapazität, vgl. 
2.3.3) zu speichern. 
Abhilfe: Datenfeldinhalte ab- 


kürzen. 


- 3: Überschreitung der Cassetten- bzw. 


zität 


"FEHLER" und NUMMER 


gabe erfolg- 


Bild 3-35 Ablaufplan F 


64eLBL °F" 
65 SF 26 
66 “FEHLER” 
6? ARCL 8 
68 RÜL b 
69 TONE 7 
?8 TONE 2 
?ı PSE 
72 FS%C 23 
73 610 "* 
?4 STO b 


Bild 3-36 Listing F 


Extended Memory-Kapa- 


Abhilfe: zweites X MEMORY Modul einsetzen oder Datensätze 


löschen. 


68 3 Software 


Moduleigenschaften 


aufrufende Module: änEP 

aufgerufenes Modul: m 

Parameter IN: Reg. X Fehlernummer (NUMMER) 
Besonderheiten 


Um bei der Fehlermeldung die Aufmerksamkeit des Benutzers zu 
sichern, werden zwei synthetische TONE-Anweisungen verwendet. 
Da sich manche Töne je nach Betriebssystem-Version unterschei- 
den, kann es sein, daß die hier programmierten TONEs nicht die 
gewünschte Wirkung zeigen - oder hören lassen. 


Modifikation 


073 GTO_"A' - Name des residenten Programmfiles 


3.2.6 I - Initialisierung des Inhaltsverzeichnisses 


Aufgabe 


wird die Frage INITIALISIEREN? vom Benutzer positiv beant- 
wortet, werden alle ausgewählt markierten Datensatznamen de- 


markiert und ZAUS auf O gesetzt. 


Moduleigenschaften 


aufrufende Module: aln 
aufgerufenes Modul: J 
working file: 


3.2.7 J - Ja/Nein-Prompt 69 


366+LBL "I" 
367 "INITIALISIEREN" 

368 KER ".J* 

369 X#Y? 

376 RTN 

Tr 

372 CLK 

373 SEEKPTA 

374 STO 61 

375 RCL b 

376 "#" 

377 POSFL 

378 X08? 

379 RTN 

388 SICH 

364 DELCHR 

392 "k" 

383 INSCHR 

384 Kor 

385 STO b 


ZAUS := O, alle aus- 
gewählt markier- 
ten DSN demarkieren 


RETURN 


Bild 3-37 Ablaufplan I Bild 3-38 Listing I 


3.2.7 J - Ja/Nein-Prompt 


Aufgabe 


Das Modul J gibt den im ALPHA-Register übergebenen Text mit 
einem ? aus und erwartet die Eingabe des Benutzers. Die er- 
sten sechs Zeichen des eingegebenen Textes werden in das X-Re- 
gister, JA in das Y-Register gespeichert. Das aufrufende Mo- 
dul kann die Wahl des Benutzers durch die Vergleiche X=Y? 
oder X#Y? ermitteln. 
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4B8+LBL "J* 
481 "H?" 
462 TONE 7 
483 AYIEN 
484 CLA 
485 PSE 
406 FL? 23 
487 PSE 

488 FE%C 23 
489 PSE 

418 CLD 

411 ASTO X 
412 "JA” 
413 ASTO Y 
414 ‚END. 


von 


TEXT und 


RETURN 


Bild 3-39 Ablaufplan J Bild 3-40 Listing J 


Moduleigenschaften 


aufrufende Module: INUaadlııaAlW 
Parameter IN: ALPHA TEXT 
OUT: Reg. Y TAN 


Reg. X ETEXT 


Modifikation 
406-407 Die Zahl der Anweisungsfolgen FC? _23 PSE ent- 


spricht dem Zeitraum, in dem eine Antwort des Benut- 


zers angenommen wird. 


3.2.8 K - Kennungstest 


Aufgabe 


Das Modul K erzeugt aus den Daten im ASCII-File A einen Daten- 


satznamen (ohne CODE). 


3.2.8 K - Kenn test 7 


AFELD := dem DSN entspre- 
chendes Feld in A, AZEICHEN 
:= erstes dieses Feldes 


AZEICHEN := 


j 


AZEICHEN 


AZEICHEN := "0" 


AZEICHEN := "U" 


RSS| 


KOBE 
"ANDERE CASS." @) < AZEICHEN 
| und AZEICHEN T ? x 


Bild 3-41 Ablaufplan K 
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L18+LBL 04 132 RCL 28 147 GTO 14 159 RCL 19 

119 "ANDERE CASS.: " 133 ATOX 148 RCL 21 168 KV 
128 xodY 134 %#Y? 149 GTO 13 161 8=1? 
121 XTOR 135 GETREC 162 85 
122 TONE @ 136 ASTO X 150+LBL 14 
123 AYIEN 137 CLA 151 CLX 163eLBL 13 
124 SF 18 138 ARCL X 152 RCL 89 164 RCL 03 
125 ER °C" 139 °+ a 153 X#Y? 165 87? 

148 ASTO 05 154 CTO 14 166 GTO 84 

126+LBL "K* 141 RCL 14 155 79 167 CLX 
127 Rn" 142 ATOX 156 GTO 13 168 RCL 82 
128 RCL 16 143 X=Y? 169 x(Y? 
129 SEEKPTA 144 RTN 157+LBL 14 179 CTO 84 
138 GETREC 145 RCL 26 158 CLX LFI RTN 
131 SEEKPT 146 KrY? 


Bild 3-42 Listing K 


Außerdem überprüft es, 


eingelegten Datencassette paßt. 


ob dieser Datensatzname zur Kennung der 
Ist dies nicht der Fall, wird 


der Benutzer zum Wechsel der Cassette (Modul c) aufgefordert. 


Moduleigenschaften 


aufrufende Module: 


aufgerufenes Modul: 


Parameter OUT: 
working file: 
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Il6+LBL 84 129 RCL 14 143 XTOR 156 RCL 83 
117 "ANDERE CAS$.: * 138 ATOX 144 RCL 07 157 89V? 
118 KCdY 131 %=Y? 145 SF 25 158 GTO 84 
119 &TOA 132 6T0 14 146 SEEKPT 159 KOdY 
126 TONE ® 133 RCL 12 147 FC9C 25 i68 RCL 82 
121 AVIEM 134 KY? 148 GTO 14 161 KY? 
122 SF 18 135 CTO 14 149 ARCLREC 162 GTO 84 
123 XER "c” 136 KOY 158 ASTO X 163 RTN 
137? RCL 22 151 CLA 
L24+LBL "K“ 138 KOY 152 ARCL X 164+LBL 14 
125 "RA" 139 X#7? 153 "H © 165 "2" 
126 CLX 148 %)Y? 154 ASTO 85 166 ASTO 85 
127 SEEKPTA i41 670 14 155 KOY 167 RTH 
128 GETREC 142 CLA 


Bild 3-43 Listing K (ORNI-System) 


Besonderheiten 


Bei der "Berechnung" des Datensatznamens wird ein führender 
Präfix eines Großbuchstabens ( : ) nicht berücksichtigt (Zei- 
len 131 bis 135). Der Datensatzname wird rechts mit Blanks 
aufgefüllt. Ist das erste Zeichen des Datensatznamens ein Um- 
laut, wird er - nur für die Überprüfung der Kennung - in den 


entsprechenden Vokal umgewandelt (Zeilen 145 bis 162). 


Modifikation 


128 RCL_16 - Position des dem Datensatznamen entspre- 
chenden Feldes 

130-139 Dies ist die einzige Stelle im gesamten System, an 
der Datensatznamen erzeugt werden. Eine Änderung der 
"Berechnungsmethode" ist somit recht einfach. Bild 
3-43 zeigt das Modul K des ORNI-Systems (zur Verwal- 
tung von Vogeldaten), bei dem die Datensatznamen aus 
den Stellen 1 und 8 bis 12 der 13-stelligen Ring- 
nummer gebildet werden (Datenregisterinhalte: 07: 
0,007, 12: 48, 14: 63, 22: 58) 
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3.2.9 P - Plausibilitätskontrolle und programmierte Abkürzun- 


gen 


Aufgabe 


Das Modul P überprüft die Plausibilität des im ASCII-File A 
gespeicherten Datensatzes und ersetzt - soweit erforderlich - 
die programmierten Abkürzungen durch Klartext. Die hierzu not- 
wendigen Aktionen unterscheiden sich je nach Verwendungszweck 


des Systens. 


Als Mindestanforderung ist zu überprüfen, daß das dem Daten- 
satznamen entsprechende Feld nicht leer ist. Beim ADRESS-Sy- 
stem wird außerdem getestet, ob die Felder ORT und FELDI nicht 
leer sind. Erfüllen die Daten nicht die Plausibilitätsbedin- 
gungen, wird der Benutzer mit der Meldung DATEN_FALSCH zur 
Änderung aufgefordert (Modul E). 


An programmierten Abkürzungen stehen hier F für :FRAU und 

H für :HERRN (Felder ANREDE1 und ANREDE2) zur Verfügung. 
Ein = im Feld NACHNAME2 kopiert den Inhalt des Feldes 
NACHNAMEIl. 


Moduleigenschaften 


aufrufende Module: än 

aufgerufenes Modul: EF 

working file: A 

Datenregister: 04 erstes Zeichen von AFELD 


A muß bereits beim Aufruf von P working file sein. 
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AFELD := ORT-Feld 
E: "DATEN FALSCH" 


AFELD := NACHNAME2-Feld 


AFELD := 
"HERRN" 


ANREDE1- bzw. ANREDE2- 
Feld := AFELD 


Bild 3-44 Ablaufplan P 
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172+LBL 85 189 XEQ 13 207 SEEKPT 224+LBL 13 

173 “DATEN FALSCH" 198 %=Y? 288 GTO 11 223 SEEKPT 
174 XER "E" 191 6TO 85 226 GETREC 

192 RCL 89 289+LBL 14 227 RCL 15 

175+LBL "P" 193 XEO 13 218 ALENG 228 ATOX 
176 12 194 X=y? 211 %28? 229 STO 84 
177 XEB 13 195 TO 85 212 RIN 230 Kr? 
178 x=1? 196 RCL 17 213 RCL 23 231 REL 11 
179 6T0 65 i97 SEEKPT 214 RÜL 84 232 RTN 
188 SICH 198 GETREC 215 x=Y? 
181 XER 13 199 ATOX 216 ":HERRN” 330+LBL 11 
182 X#Y? 298 61 217 x=99 331 DELREC 
183 xEQ 14 291 x#7? 218 GTO 11 332 SF 25 
184 5 202 RTN 219 RCL 22 333 INSREI. 
185 XER 13 293 RCL 16 220 XY? 334 FS°%C 25 
186 K#7? 204 SEEKPT e2l RTN 335 RTN 
187 XEQ 14 205 GETREC 222 ":FRAU" 336 2 
188 RCL 16 286 Rt 223 CTO 11 337 610 "F* 


Bild 3-45 Listing P 


Besonderheiten 


Das Modul P setzt voraus, daß das ASCII-File A das working 


file ist. 


Die Zeilen 330 bis 337 gehören auch zu dem Modul E. 


Modifikation 


176-223, 
330-337 


Hier können beliebige Bedingungen und Abkürzungen 
programmiert werden. Der Test des Datensatznamens 
(Zeilen 187 bis 190) muß jedoch immer ausgeführt 
werden. Bild 3-46 zeigt das Modul P des recht kom- 
fortablen GALERIE-Systems (zur Verwaltung von Einla- 
dungsadressen). Interessant ist hier die speicher- 
platzsparende Codierung der Postleitzahlen - die Ab- 
kürzungen der Ortsnamen wirken auf zwei Felder (PLZ 
und ORT). 
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147*LBL 85 
148 "DATEN FALSCH“ 
149 ER "E" 


156+LBL "pP" 
151 12 

152 XEB 13 
153 %=7? 
154 GTO 65 
155 XEQ 18 
156 SIGN 
157 XEO 13 
158 xy? 
159 XEO Il 
168 5 

161 XEQ 13 
162 %#1? 
163 XEG 11 
164 2 

165 %EQ 13 
166 X27? 
167 AEG 12 
168 6 

169 XEO 13 
170 x? 
171 XER 12 
172 11 

173 XEQ 13 
174 %=7? 
175 GT0 85 
176 4 

177 XEO 13 
178 8=1? 
179 GTO 85 
188 8 

181 SEEKPT 
182 GETREC 
183 ATOX 
184 61 

185 %#1? 
186 GTO 14 
187 4 

188 SEEKPT 
189 GETREC 
198 8 

191 SEEKPT 
192 6T0 89 


193+LBL 14 
194 9 

195 XEQ 13 
1% %=Y? 


197 RTN 
198 RCL 85 
199 85 
208 XY? 
281 RTN 

202 "UND :FRAU :GENA“ 
283 "HHLIN“ 
204 GTO 89 


edy+LBL 16 
286 ALENG 
287 X#0? 
209 RTN 
209 "NC:MEMMINGEN“ 
218 XEQ 19 
eil %=Y? 
212 RTR 
213 "AC:M:M-:AMENDIN“ 
214 "HGEN” 
215 XEQ 16 
216 X=Y? 
217 RTR 
218 "EC:M:N-:EISENBU” 
219 "FRG" 
228 AED iR 
221 X=1? 
222 RIN 
223 °SC:N:M-:STEINHE” 
224 "HIN 
225 XE@ 10 
226 X=7? 
227 RTN 
228 "B):BUXHEIM“ 
223 KEQ 18 
230 8=Y? 
231 RTN 
232 "Gr :GRANENBACH" 
233 XER 18 
234 %=1? 
235 RTN 
236 "F-:ZELL2" 
237 18 
238 AROT 
239 XEQ 18 
248 x=Y? 
241 RTN 
242 “W) :WOLFERTSCHWE” 
243 "HNDEN” 
244 YER 18 
245 X=1? 
246 RTN 


247 "0%*:0TTOBEUREN” 
248 XEQ 18 
249 X=Y? 
258 RTN 
251 "KX:KEMPTEN” 
252 XEQ 10 
253 X? 
254 RTH 
255 "D=:DIETMANNSRIE“ 
256 "FD" 
237 GTO 10 


258+LBL 11 
259 ALENG 
268 K#0? 
261 RTN 
262 "F:FRAU“ 
263 KEB 11 
264 X=Y? 
265 RTN 
266 “H:HERRN” 
267 KEG il 
268 3=Y? 
269 RTK 
279 ASTO 86 
erı "R“ 
272 ARCL 06 
273 °H :RECHTSAHMALT* 
274 XEO 11 
275 X=7? 
276 RTN 
a7 "5° 
278 ARCL 86 
279 “+ :STEUERBERATE” 
288 "FR" 
281 XEQ 11 
282 x=Y? 
283 RTN 
284 “A” 
265 ARCL 86 
266 *H :ARCHITEKT” 
287 GTO 11 


2Hd+LBL 12 
289 ALENG 
298 K+0? 
291 RTN 
292 "D:DR.” 
293 XEQ 11 
294 X=Y? 
295 RTN 
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296 "+ MED.N” 
297 9 

298 ARUT 
299 KEG 11 
308 x=Y? 

381 RTH 


382 "+ DENT.Z* 


383 15 
384 AROT 


305eLBL 11 
306 ATOX 
387 RCL 84 
308 Key? 
399 RTN 
318 GTO 14 


311LBL 13 
312 SEEKPT 
313 GETREC 
314 RCL 15 
315 ATOX 
316 STO 94 
317 97? 
318 REL il 
319 RTK 


328+LBL 10 
321 ATOX 
322 RCL 94 
323 X#1? 
324 RTN 
325 ATOX 
326 8988 
327 + 

328 STO 46 
329 XEQ 89 
338 11 

331 SEEKPT 
332 CLA 
333 ARCL 86 


334+LBL 69 
335 DELREC 
336 SF 25 
337 INSREC 
338 FS9C 25 
339 RTN 

340 2 

341 G6T0 °F” 
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3.2.10 S - Save 


I: XMEM *DCASS 
ZTOT ZAUS: DMEM >DCASS 
RETURN 


Bild 3-47 Ablaufplan S 


347+LBL "5" 
348 "1" 

349 SAYERS 
30 "" 

351 RCL 86 

352 SEEKR 

333 WRTRX 

354 RTH 


Bild 3-48 Listing S 


3: weeosmiorene |] 


RETURN 


Bild 3-49 Ablaufplan W 


3I8+LBL "W* 
399 "WIEDERROLEN“ 


4a8+LBL "J" 


Bild 3-50 Listing W 


Aufgabe 


Das Modul S speichert das In- 
haltsverzeichnis I sowie die 
Zahlen ZTOT und ZAUS auf der 
Datencassette. 


Moduleigenschaften 


aufrufende Module: ce 


working file: I 


Modifikation 


350 "a' - Name des Daten- 


registerfiles 


3.2.11 W - Wiederholen-Prompt 


Aufgabe 


Der Aufruf des Modules W ent- 
spricht exakt der Wirkung des 
Modules J mit dem Textparameter 
WIEDERHOLEN 


3.3 Systemkonstanten — ADRRE 


Moduleigenschaften 


aufrufende Module: INE 
aufgerufenes Modul: J 
Parameter OUT: Reg. Y NJAN 


Reg. X ETEXT 


3w3 Systemkonstanten - ADRRE 


Bild 3-51 zeigt die Belegung der Da- 
tenregister mit den Konstanten des 
ADRESS-Systems. Die Inhalte der Regi- 
ster 13 und 28 bis 31 sollten nicht 
verändert werden. Die anderen Regi- 
ster können im Rahmen der Programmop- 
timierung (vgl. 4.2) neu belegt wer- 
den. 


Das Register 31 enthält den Initiali- 
sierungsstatus der Flags OO bis 43 im 
RCLFLAG/STOFLAG-Format. Diese Text- 
konstante kann auf zwei Arten erzeugt 


werden: 


- normal: den Rechnerstatus laut Bild 
3-52 setzen (etwa nach master 
clear: SF_08 CF_21 CF_28 CF_29 
FIX_O), RCLFLAG STO_31 


- synthetisch: CLA 31 XTOA 240 XTOA 8 
XTOA O XTOA 2 XTOA O0 XTOA 8 XTOA 
RCL_M STO_31 


Das Programm ADRRE (Barcode s. 6.2) 
speichert die Konstanten des ADRESS- 
Systems automatisch in den entspre- 


chenden Datenregister. 


Ra6= 8.BAl 


R13= * 


1.882 
1.084 
13.998 
29.008 
32.986 
45.255 
A," 
63.884 
94.088 
4.808 
8.888 
36.688 
38.088 
58.088 
65.008 
0.888 
72.088 
73.688 
79.088 
97.088 
186.888 
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Bild 3-51 Systemkon- 


stanten 


STATUS: 


SIZE= 
gli 
DEG 

FIR B 


FLAGS: 
F 89 


832 


CLEAR 


CLEAR 
set 
CLEAR 


CLEAR 
SET 
CLEAR 


CLEAR 
SET 
CLEAR 
CLEAR 
SET 


tus 


Bild 3-52 Rechnersta- 


4 Programmoptimierung 


Besonders bei relativ großen Software-Systemen lohnen sich 
Überlegungen zur Programmoptimierung. Neben den allgemeineren 
Zielsetzungen wie Bedienungsfreundlichkeit und Sicherheit - 
sie werden bereits beim Programmentwurf berücksichtigt - sind 


zwei Optimierungsstrategien wichtig: 


- Minimierung des benötigten RAM-Bereiches: Reduzierung der 
Programmlängen (in Bytes) und Verminderung der Anzahl der 


benützten Datenregister; 


- Verkürzung der Ausführungszeiten: Verwendung schneller An- 


weisungen bzw. Anweisungsfolgen. 


Diese beiden Zielsetzungen können sich gegenseitig verstärken 
(z. B. werden kurze Programme unter Umständen schneller gela- 
den), wirken aber oft auch entgegengesetzt, wie das Beispiel 
der Zahl 1 zeigt (Bild 4-1): die um den Faktor 3 schnellere 
Anweisungsfolge CLX SIGN benötigt doppelt soviel Speicher- 


platz wie die konventionelle 1. 


Anwei- Speicher- Ausf.- Voraus- Stack- LAST X- 
sungen platz zeit setzung lift Inhalt 
Bytes ms rel. 

1 1 64,3 - Ja unv. 

E 1 58,2 - Ja unv. 
SIGN 1 13,0 X>0, Zahl nein X 

ST/ X 2 41,8 X#0, Zahl nein x 
CLX"SIGN 2 22,7 - nein [6) 


Bild 4-1 Verschiedene Möglichkeiten, die Zahl 1 zu laden 
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Offensichtlich ist die Häufigkeit des Auftretens einer zu op- 
timierenden Anweisungsfolge ein wesentliches Kriterium für die 
optimale Entscheidung. Da aber Programmteile wiederholt durch- 
laufen werden können, ist die Häufigkeit je nach verfolgter 


Strategie in verschiedenen Ausprägungen zu betrachten: 


- Für die Minimierung des Speicherplatzes ist die Zahl der An- 
weisungssequenzen im Programmtext, die statische Häufigkeit, 
relevant. 


- Bei der Optimierung nach der Ausführungszeit ist die Anzahl 
der bei einem Programmlauf abgearbeiteten Anweisungen, die 
dynamische Häufigkeit, maßgebend. 


während die statische Häufigkeit leicht durch Zählen im Pro- 
grammtext ermittelt werden kann, lassen sich für die dynami- 
sche Häufigkeit oft nur empirisch ermittelte Werte oder Grö- 


Benorädnungen angeben. 


Beide hier vorgestellten Strategien können - unvernünftig an- 
gewandt - zu extrem unlesbaren Programmen führen, deren War- 
tung nahezu unmöglich wird. Die Grenzen der Programmoptimie- 
rung sind also nicht erst mit dem schnellsten und kürzesten 


Programm erreicht. 


4.1 Optimierung der lokalen Sprünge 


4.1.1 Theorie 


Bei der Programmierung von Sprüngen unterscheidet man vier Ar- 


ten der Adressierung: 


- absolut: die Adresse des Sprungzieles wird codiert (z.B. 
Gto "Zeilennummer'' bei programmierbaren Taschenrechnern von 


Texas Instruments); 
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- relativ: der Abstand zwischen Sprunganweisung und -ziel so- 
wie die Orientierung des Sprunges werden angegeben (z.B. 
verzweigt beim HP-67/97 GTO_(i) mit -n im Register i wmn 
Zeilen rückwärts - dies ist allerdings eine indirekte 


(s. u.) relative Adressierung); 


- symbolisch: das Sprungziel wird mit einem Namen versehen, 
der Argument der Sprunganweisung ist (Label); 


- indirekt: das Argument der Sprunganweisung steht in einem 
Register (z. B. GTO_IND_OO beim HP-41). 


Da die symbolische Adressierung zwar bequem zu programmieren 
(die Sprungadressen bzw. -distanzen müssen nicht ausgerechnet 
werden), aber auch sehr ineffizient ist (das passende Label 
muß erst gesucht werden), verwendet das Betriebssystem des 
HP-41 neben der indirekten Adressierung, die im folgenden un- 
berücksichtigt bleibt, eine Kombination aus symbolischer und 
relativer Adressierung /1/. Bei der ersten Ausführung eines 
GTOs oder XEQs wird das entsprechende Label gesucht und der 
Abstand zum Sprungziel sowie die Orientierung des Sprunges in 
die Sprunganweisung geschrieben. Das Label wird erst im Be- 
reich zwischen Sprunganweisung und END, dann vom Programman- 


fang bis zur Sprunganweisung gesucht. 


Das Betriebssystem übersetzt (compiliert) also symbolische in 
relative Sprünge, die direkt (ohne Labelsuche) ausgeführt 
werden können. Da die Sprungdistanzen und -orientierungen im 
compilierten Programm gespeichert sind, werden sie bei 
Transfers nach bzw. von Magnetkarte, IL-Massenspeicher, 
Extended Memory oder Barcode mit übertragen. Nach Änderungen 
im Programm werden sicherheitshalber alle Sprungdistanzen auf 
O gesetzt, um das Betriebssystem die Sprunganweisungen neu 
compilieren zu lassen, Hat ein Programm kein eigenes END (nur 
das permanente .END. des Programmspeichers), zerstört auch 
PACKING die Sprungdistanzen. 
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Mit Mitteln der synthetischen Programmierung oder durch Aus- 
nützen eines Fehlers in älteren Betriebssystemen (Bug 8: wird 
nach Änderungen der PRGM-Modus durch einen Druck auf die ON- 
Taste verlassen, werden die Sprungdistanzen nicht gelöscht) 
lassen sich auch relative Sprünge ohne Labels programmieren 
/2/. Der hohe Aufwand bei der Programmierung und Wartung wird 
jedoch nur in Extremfällen durch Reduzierung der Programmlänge 
(ein oder zwei Bytes) und Geschwindigkeitserhöhung (ca. 40 % 
der Ausführungszeit einer Sprunganweisung mit Label) gerecht- 
fertigt. 


Normalerweise speichert der Rechner GTO-Anweisungen mit den 
Argumenten 00 bis 14 sowie die entsprechenden Labels im Kurz- 
form-Format. Sie belegen dann zwei bzw. ein Byte des Programm- 
speichers, Ein Kurzform-GTO-Befehl kann jedoch nur Sprungdi- 


stanzen bis zu +112 Bytes speichern. 


Größere Sprungweiten können nur in Langform-GTOs (mit den Ar- 
gumenten 15 bis 99, A bis J und a bis e) compiliert werden, 
die drei Bytes belegen. Die entsprechenden Labels benötigen 
zwei Bytes. Mit Hilfe der synthetischen Programmierung können 
weitere Langform-Anweisungen mit den Argumenten 100, 101 sowie 
T, 2, Y, X, L,M, N, O0, P, Q, und | (das sind - neben a bis 


e - die Bezeichnungen der Statusregister) erzeugt werden. 


XEQ-Anweisungen belegen immer drei Bytes und können beliebig 


lange Sprungdistanzen speichern. 


während des Programmeditierens unterscheidet das Betriebssy- 
stem Kurzform- und Langform-Anweisungen anhand der Labelargu- 
mente: 00 bis 14 einerseits und 15 bis 101, A bis e anderer- 
seits. Dieser starre Zusammenhang zwischen Sprungbefehlen und 
Labels läßt sich mit Mitteln der synthetischen Programmierung 
aufheben. Sind z. B. 10 kurze und ein langer Sprung auf ein 
und das selbe Ziel zu programmieren, spart man mit einem Lang- 
form- und 10 Kurzform-GTOs sowie einem Kurzform-LBL gegenüber 


der normalen Programmierung 11 Bytes. 
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Im folgenden wird ein Verfahren beschrieben, das unter Berück- 
sichtigung der statischen Häufigkeit die Kurzform-Argumente 
auf die zu programmierenden Sprünge optimal verteilt, also den 
belegten Programmspeicher reduziert, Die dynamische Häufigkeit 
ist nur bei sehr kurzen Schleifen zu beachten (Kurzform-GTO- 
Anweisungen sind ca. 1,4-mal schneller als die entsprechenden 
Langform-Befehle). 


4.1.2 Verfahren zur Optimierung der Labelargumente 


Die Voraussetzung für das folgende Schema ist ein gepacktes 
(GTO_..) Programm mit beliebig verteilten Labeln. Labelargu- 
mente, die nicht verändert werden dürfen (z. B. bei indirekten 


Sprüngen), bleiben im folgenden unberücksichtigt. 


Programm Markierung optimiert Markieren und Zählen 
100 GTO 20 20OL GTO 14 Auf einem Programmlisting 
n (3 B.) (am günstigsten im NORM- 
200 LBL 02 K LBL 00 Modus des Druckers er- 
Ki stellt) werden alle GTO- 
205 GTO 02 02K GTO 00 und XEQ-Anweisungen sowie 
: die zugehörigen Labels 
210 GTO 20 20K GTO 14 markiert (vgl. Bild 4-2). 
3 Anschließend ist die Zahl 
215 LBL 20 AL 4K LBL 14 derjenigen auf jedes La- 
s bel zielenden GTO-Anwei- 
220 GTO 03 O3K GTO 14 sungen zu ermitteln, die 
5 sich in Kurzform codieren 
225 LBL 03 4K LBL 14 lassen (statische Häufig- 
keit). Dies sind die 
K: Kurzform-Sprung Sprünge über eine Distanz 


L: Langform-Sprung von weniger als 113 By- 


tes, In Grenzfällen läßt 
sich die Sprungart wie 


Bild 4-2 Optimierung lokaler 
Sprünge folgt ermitteln: 
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- falls notwendig, GTO-Befehl 
und Label durch die entspre- 
chenden Kurzform-Anweisungen 
ersetzen 

- Programm packen: PACK 

- Sprunganweisung ausführen: 

SST 

zurück zur Sprunganweisung 


und dieselbe noch einmal aus- 
führen: GTO_.XYZ, SST-Taste 
kurze Zeit gedrückt halten 

- Falls der zweite Sprung 
schneller ausgeführt wird als 
der erste (GTO XY ist nur 
kurze Zeit zu sehen), war die 
Compilierung des Sprunges er- 
folgreich, die Kurzform- 


anweisung also ausreichend. 


Verteilen der Kurzform-Argumen- 


= 


Die Kurzform-Labels 00 bis 14 
werden nun auf die Sprungziele 
mit den meisten kurzen Sprüngen 
verteilt. Sollten Label-Anwei- 
sungen unbenannt bleiben, be- 
kommen sie Langform-Argumente 
(15 bis 99, synthetisch: 100, 
101, A bis e). Selbstverständ- 
lich können Labelargumente in 
einem Programm mehrmals verwen- 
det werden. Bild 4-3 zeigt die 


korrekten Positionen paralleler 


GTO 00 
Y Y 


LBL 00 LBL 00 
GTO 00 ...... .....e...-.... 


LBL 00 „|, ern, 000000. 
GTO 00 GTO 00 


LBL 00 


LBL 00 101010010000 0000R% 


GTO [6I6) .. 1 [1001000000110 00 0° 


Bild 4-3 korrekte Positio- 
nen gleichnamiger 
Sprünge 
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Sprung- und Label-Anweisungen mit übereinstimmenden Argumen- 


ten. Alle anderen Kombinationen führen zu logischen Fehlern. 


Mit zwei Ausnahmen wurden bei der hier vorgestellten Software 
die Labelargumente für Rückwärtssprünge mit 00 beginnend in 
aufsteigender Folge, die für Vorwärtssprünge mit 14 beginnend 
abwärts zählend verteilt. Diese Maßnahme erhöht die Lesbarkeit 


der Programme. 


Ändern des Programmes 


Die Sprung- und Label-Anweisungen sind entsprechend der neuen 
Verteilung der Labelargumente abzuändern. Für lange Sprünge 
auf Kurzform-Labels werden synthetische 3-Byte-GTO-Befehle 
verwendet (vgl. 5.6). Die Änderung einer Label- oder Sprungan- 
weisung kann die Verlängerung oder Verkürzung der Distanzen 
anderer Sprünge bewirken. Diese Seiteneffekte können eine Neu- 


verteilung der Labelargumente erforderlich machen. 


4.1.3 Manipulation des Programmzeigers 


Mit RCL_b bzw. STO_b wird das Status- 


register b, das neben zweieinhalb 
09 "" Rücksprungadressen den Programmzeiger 
Hr Ep enthält, direkt adressiert. Somit las- 
12h sen sich absolute Sprünge programmie- 
13 READSUB R . 
14 SAYEP ren, die sehr schnell ausgeführt wer- 
ne den. Allerdings lohnt sich der recht 
17 STO b hohe Aufwand der programmgesteuerten 


Berechnung eines korrekten Register-b- 
Inhalts meist nicht. 
Bild 4-4 RCL_b/STO_b 
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Nur bei Schleifen kann die Adresse des Sprungzieles einfach 
mit RCL_b ermittelt werden. Der Wert darf allerdings nicht in 
einem Datenregister zwischengespeichert werden, da er dann 
durch Normalisierung verändert werden kann. Meist wird der In- 
halt des Registers b im Stack gespeichert. Bild 4-4 erläutert 
diese Technik anhand eines Ausschnitts des Modules IN. 


4.2 Optimierung der Konstanten 


4.2.1 Theorie 


Konstanten können direkt im Programmtext angegeben oder in Da- 
tenregistern gespeichert und aufgerufen werden. Die erste Mög- 
lichkeit ist relativ speicher- und zeitintensiv: pro digit- 
entry-Operation (das sind die einzelnen Ziffern, aber auch 
Vorzeichen, Dezimal-Komma bzw. -Punkt sowie Exponent-E) werden 
ein Byte Programmspeicher sowie zwischen 40 und 80 ms Rechen- 
zeit benötigt. RCL-Anweisungen belegen ein oder zwei Bytes und 


werden etwa doppelt so schnell ausgeführt wie eine Ziffer. 


Da ein belegtes Datenregister den für Programme freien Bereich 
um sieben Bytes reduziert, ist für jede Konstante zu entschei- 


den, ob sie im Programm oder in einem Register stehen soll. 


Benützt ein System das Cassettenlaufwerk, können die Konstan- 
ten in einem DA-File gespeichert und beim Programmstart in die 
Datenregister des Rechners geladen werden. So entfallen eine 
Reihe von STO-Anweisungen. Da ein Record eines IL-Massenspei- 
chers genau 32 Datenregister aufnehmen kann (vgl. 2.3.2), wer- 
den Bereiche von 32, 64, 96, ... Registern besonders effizient 


gespeichert und geladen. 
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Wie bei den Sprüngen und Labels gibt es auch bei der Register- 
adressierung Kurzform- und Langform-Anweisungen. Die Datenre- 
gister 00 bis 15 werden mit 1-Byte-Befehlen direkt adressiert. 
Zugriffe auf die anderen Register benötigen zwei Bytes und 
sind geringfügig langsamer. X<>_ _ und indirekte Anweisungen 
belegen immer zwei Bytes. Natürlich lassen sich auch Lang- 
form-RCLs und -STOs auf die Register 00 bis 15 synthetisieren. 
Im Gegensatz zu den Langform-GTOs auf Kurzform-Labels lassen 


sie sich jedoch nicht sinnvoll einsetzen. 


Bei der Entscheidung, welche Konstanten in welchen Registern 
gespeichert werden sollen, hilft das folgende Schema, das die 
statische und die dynamische Häufigkeit berücksichtigt. 


4.2.2 Schema zur Optimierung der numerischen Konstanten 


Das Verfahren wird im folgenden anhand des ADRESS-Systems (oh- 
ne die Hilfsprogramme ADRUP, ADRIN, ADRBE) erläutert. 


Ermittlung der Konstanten (Bild 4-5, Spalten 1 und 2) 


Hierbei bleiben Konstanten, die ein Byte belegen und nur sehr 
selten benützt werden (z. B. die Fehlernummern 1, 2 und 3 als 
Parameter des Moduls F), unberücksichtigt. Die Werte O und 1 
können meist durch die schnellen Anweisungen CLX bzw. SIGN 


oder CLX SIGN ersetzt werden, 


In Spalte 2 werden die Häufigkeiten der Konstanten festgehal- 
ten. Die dynamische Häufigkeit läßt sich hier nur in Größen- 
ordnungen angeben. Es gelten folgende Abkürzungen: 


einmal pro Aufruf des Modules; 
einmal pro Verarbeitung eines Datensatzes; 


einmal pro Verarbeitung eines Datenfeldes; 


Nm un = 


einmal pro Verarbeitung eines Zeichens, 
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stat. Häufigkeit 


Auftreten |dyn. Häufigkeit 
zZ F S M Rang |Zahl Ersp. Rang 


Bild 4-5 Optimierung der numerischen Konstanten 


Ein vorangestellter Faktor erhöht die dynamische Häufigkeit. 
Die angehängte Modulbezeichnung erleichtert die Neuverteilung 


der Konstanten nach Programmänderungen. 
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Bestimmung der freien Datenregister 


Beim ADRESS-System werden die Register 06 bis 12 und 14 bis 27 
für die Speicherung numerischer Konstanten verwendet. In den 
Registern 13 und 29 stehen ALPHA-Konstanten, die im Modul ä 
über die Konstanten 13 und 29 indirekt adressiert werden, 


Optimierung nach der dynamischen Häufigkeit (Bild 4-5, Spalte 
3) 


Für die Entscheidung, ob eine Konstante NBERhAURt in einem Da- 
tenregister zu speichern ist (hier stehen für 35 Konstanten 
nur 21 Register zur Verfügung), ist die dynamische Häufigkeit 
maßgebend. 


Da zur Ausführungszeit einer im Programmtext stehenden Kon- 
stanten sämtliche digit-entry-Anweisungen zählen, ist die Häu- 
figkeit mit der Anzahl dieser Operationen zu multiplizieren, 


Die Auswertung erfolgt getrennt nach Größenordnungen. 


Die dynamischen Häufigkeiten in Verbindung mit der Priorität 
der Größenordnungen (hier Z, F, S, M) ergeben eine Rangfolge. 
Die in diesem Sinne häufigsten Konstanten werden in den freien 
Datenregistern gespeichert, die restlichen in den Programmtext 


übernommen, 


Optimierung nach der statischen Häufigkeit (Bild 4-5, Spalte 
4) 


Bei der Verteilung der Konstanten auf die in Kurzform adres- 
sierbaren Datenregister spielt neben der statischen Häufigkeit 
auch die Anzahl der durch die Speicherung in einem Kurzform- 
Register gesparten Bytes eine Rolle. Diese ist die um eins 
verminderte Zahl der digit-entry-Anweisungen. Sie wird mit den 


Werten der statischen Häufigkeit multipliziert. 
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Die Konstanten, deren Speicherung in Kurzform-Registern die 
größten Einsparungen bewirken, werden auf die Kurzform-Regi- 
ster verteilt. Sind zwei Konstanten in diesem Sinne gleichwer- 
tig, ist ihre Rangfolge nach der dynamischen Häufigkeit ent- 
scheidend. 


Bild 4-5, Spalte 5 zeigt die endgültige Verteilung der Kon- 
stanten des ADRESS-Systems, 


5 Synthetische Programmierung 


Dieser Abschnitt soll keine Einführung in die synthetische 
Programmierung sein, sondern schrittweise zu den synthetischen 
Anweisungen des ADRESS-Systems führen. Je nach Wissensstand 
und Ausstattung kann der Leser auf verschiedenen Ebenen ein- 


steigen: 

Teil Voraussetzungen Ergebnis 

5.1 (Grundlagen) 

52 Byte Grabber (BG) 

5.3 BG Load Bytes-Programm (LB) 

5.4 LB Key Assignment-Programm (KA), BG 
5.5 KA Q-Loader (TQ, LQ, GQ, XQ) 

5.6 BG, TQ, LQ, GQ, XQ, LB beliebige Anweisungen 


Sollte sich der Rechner während synthetischer Experimente 
seltsam verhalten (Crash, keine Reaktion auf Tastendruck) 
hilft meist die master clear-Prozedur, In seltenen Fällen 
ist - bei nicht angeschlossenem HP-82143A - kurz das Batterie- 


oder Akku-Paket herauszunehmen. 


5.1 Grundlagen 


Der Rechner verschlüsselt die programmierten Anweisungen in 
Bytes. Bei einfachen programmierbaren Taschenrechnern (etwa HP 
Serie 10) reichen die 256 Werte eines Bytes aus, um alle 
Anweisungen zu codieren. Die komplexeren Befehle des HP-41 


werden in mehreren Bytes gespeichert. So kann ein Byte je nach 
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Kontext verschiedene Bedeutungen haben. Alle Informationen 
hierzu finden sich in der HP-41 QUICK REFERENCE CARD FOR SYN- 
THETIC PROGRAMMING (kurz: Hexcode-Tabelle, s. 6.5). Der Wert 


des ersten Bytes einer Anweisung entscheidet über ihren Typ: 


- 1-Byte-Funktionen stehen in den Zeilen O bis 8 (außer 1D bis 
1F) der Hextabelle. Beispiele: LBL_12 (OD), ATAN (5E), ADV 
(8F) 


- normale 2-Byte-Anweisungen bestehen aus Prefix (erstes Byte, 
Werte 90 bis 9F bzw. A8 bis AD sowie CE und CF) und einem 
Suffix (zweites Byte, Werte OO bis 7F für direkte und BO bis 
FF für indirekte Adressierung des Operanden). Beispiele: 
RCL_16 (90 10), RCL_IND 16 (90 90), X<>IND_L (CE FA), 
ARCL_M (9B_75) 


- Das Prefixbyte der GTO_IND- und XEQ_IND-Anweisungen hat den 
Wert AE. Suffixe mit Werten 00 bis 7F codieren GTO_IND-, 
solche mit Werten 80 bis FF XEQ_IND-Befehle. Beispiele: 
GTO_IND_OO (AE 00), XEQ_IND_e (AE FF) 


- Peripherie-Funktionen werden als XROM a,b angezeigt (vgl. 
Handbuch des entsprechenden Geräts bzw. Moduls). Das Prefix- 
Byte nimmt den Wert 160 + abgerundet(a / 4) (dezimal) an und 
reicht von AO bis A7. Das Suffix-Byte wird mit 64 * (a MOD 
4) + b codiert. Beispiele: EMDIR (XROM 25,14, A6 4E), 
-EXT_FCN_1B (XROM 25,00, A6 40) 


- In Kurzform-GTO-Anweisungen (Prefix Bl bis BF) stehen auch 
die Distanzen zu den entsprechenden Labels (vgl. 4.1.1). 
Beispiel (uncompiliert): GTO_O1 (B2 00) 


- Bei 3-Byte-GTO- und XEQ-Anweisungen (Prefix DO bis DF bzw. 
EO bis EF) sind die Sprungdistanzen im mittleren Byte co- 
diert (vgl. 4.1.1). Das dritte Byte enthält neben der 
Sprungorientierung das Label-Argument (00 bis 7F). Beispiele 
(uncompiliert): GTO_15 (DO 00 OF), XEQ_00 (EO 00 00) 
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- Das erste Byte der Textanweisungen hat Werte zwischen FO und 
FF und gibt die Zahl (O bis 15) der folgenden Zeichen an. 
Ein einzelnes FO-Byte dient als schnelle NOP-Anweisung (no 
operation) nach DSE- und ISG-Befehlen. Beispiele: "" (FO, 
NOP), "ADRBE" (F5 41 44 52 42 45), "LA" (F2 7F 41) 


- Das Prefix-Byte der globalen Label-Anweisungen nimmt die 
Werte CO bis CD an. Die niederwertige Hälfte dieses Bytes 
sowie das zweite Byte enthalten die Distanz zum nächsten 
globalen Label oder END (vom permanenten .END. aus in Rich- 
tung fallender Zeilennummern). Zur Synthetisierung von La- 
bels genügen jedoch die Werte CO und 00 für das erste bzw. 
zweite Byte. Beim PACKING werden die Distanzen "compiliert". 
Das dritte Byte ist ein Text-Prefix, das vierte Byte - es 
steht innerhalb der Text-Anweisung, die den Labelnamen ent- 
hält - codiert die Tastenzuordnung. Beispiel (ohne Key As- 
signment): LBL_"ADRBE" (CO 00 F6 00 41 44 52 42 45) 


- Bei globalen GTO- und XEQ-Anweisungen (Prefixe 1D bzw. 1E) 
verschlüsselt die folgende Textanweisung den Labelnamen des 
Sprungzieles. Beispiel: GTO_"ADRBE! (1D F5 41 44 52 42 45) 


- Die END-Anweisung wird wie ein globales Label verschlüs- 
selt - das dritte Byte ist jedoch kein Text-Prefix. Bei- 
spiel: END (nicht-permanentes END eines gepackten und compi- 


lierten Programmes, CX YZ OD) 


5,2 BG - Byte Grabber 


Das wichtigste Werkzeug der synthetischen Programmierung ist 
der Byte Grabber. Der Befehl gehört zur Gruppe der Byte Jum- 
per, die alle nur als Tastenzuordnungen wirksam werden. Ein 
umständlicher zu bedienender Byte Jumper begründete die syn- 
thetische Programmierung /3//4/. Der Byte Grabber fand als 
(deutscher) Wolf-Befehl /5/ weniger - zu wenig - Beachtung als 


unter der Bezeichnung Prefix Masker /6/. 
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Natürlich kann der Byte Grabber nur synthetisch einer Taste 


zugeordnet werden: 


- master clear (MEMORY _LOST) 

- ASN_"GTO"_LN ASN_"DEL"_/x 

- PRGM 

- CAT_1 sofort mit R/S anhalten 

- ALPHA + ALPHA, falls jetzt nicht 4094 RCL_O1 angezeigt wird, 
wurde der CAT_1 zu spät gestoppt 

- GTO_.005 (im USER-Modus LN . LN) 

- DEL_003 (im USER-Modus x x) 

-— ''7AAAAAA", HP-41C und HP-41CV zeigen ohne X FUNCTIONS Modul 
nur "77T "an 

- PRGM CAT_1 ASN_""_Yx 


Der Byte Grabber ist nun der LN-Taste zugeordnet, Der Befehl 
wird als XROM 28,55 angezeigt und ist im RUN-Modus wirkungs- 


los. 


Die verschiedenen Bezeichnungen des Byte Grabbers lassen seine 
Wirkungsweise ahnen. Der Befehl bindet das erste Byte einer 
Multi-Byte-Funktion (aber auch das Byte einer 1-Byte-Funk- 
tion), sodaß das folgende Byte selbst die Rolle einesPrefixes 
übernehmen und die nachfolgenden Bytes "grabben'" kann. Damit 
der Byte Grabber nicht ein unsichtbares Nullbyte (00) bindet, 
ist vor seiner Anwendung meist PACK auszuführen, das alle 
freien Nullbytes beseitigt. Das folgende Beispiel veranschau- 


licht die Verwendung des Byte Grabbers. 
Aktion/Programmtext Hexcodes 
Programm eingeben: 


01 LBL_"BG" CE 00 F3 00 42 47 
02 '"'BYTE GRABBER' FC 42 59 54 45 20 47 52 41 42 42 45 52 


Text-Prefix maskieren: GTO_.001 BG 
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01 LBL_"BG" CE 00 F3 00 42 47 
02 7 TR" F7 00 37 00 00 00 00 FC 
03 * 42 

04 SIN 59 

05 CHS 54 

06 X>Y? 45 

07 RCL_OO 20 

08 + 47 

09 SQRT 52 

10 - 41 

11 * 42 

12 * 42 

13 X>Y? 45 

14 SQRT 52 


Bytes ersetzen: GTO_.004 DEL_003 X#Y? Rt LNI+X GTO_.009 


DEL 006 PI ABS FACT FACT LNI+X 
01 LBL_"BG" CE 00 F3 
02 MIT F7 00 37 
03 * 42 
04 X#Y? 79 
05 Rt 74 
06 LN1+X 65 
07 RCL_0O 20 
08 L+ 47 
09 PI 72 
10 ABS 61 
11 FACT 62. 
12 FACT 62 
13 LN1+X 65 
14 PI 72 


Prefix de-masken und aufräumen: 


01 LBL_'"BG" CE 00 F3 
00 00 00 
02 '"'BXXe GXabbeX' FC 42 79 


PI 


00 42 47 
00 00 00 00 FC 


GTO_.0O1 BG DEL_002 


00 42 47 
00 00 00 00 00 00 00 00 00 00 00 
74 65 20 47 72 61 62 62 65 72 
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5.3 LB - Load Bytes Programm 


Die oben beschriebene Methode der direkten Synthese ist recht 
umständlich und funktioniert nicht in allen Fällen. Mit dem in 
Bild 5-1 gelisteten Programm LB (Autor: Gerhard Kruse, Barcode 
s. 6.2) können beliebige Bytewerte in den Programmspeicher ge- 
laden werden. Es enthält einige synthetische Anweisungen, die 
mit dem Byte Grabber erzeugt werden können: 


Bild 5-1 Listing LB 


Befehl Zeilennr. Hex Synthese 
RCL_b 003 90 7C RCL_IND_16 MEAN BST BST BG + 
X<>M 004 041 043 CE 75 RCL_IND_78 RDN BST BST BG + 
X<?c 040 044 CE 7D RCL_IND_78 SDEV BST BST BG + 
TONE_9 029 9F 59 RCL_IND_31 SIN BST BST BG + 

di+LBL "LB* 14 ALENG 27+LBL 88 42 STO INDL 

82 CLA 152 28 F5? 22 43) [ 

83 RCL b 16 - 29 TOHE 9 4x0 c 

84 ol 1? ATOX 38 FS?C 22 45 ROY 

05 ALENG id * 31 STOP 46 CLA 

867 19 X? 32 Ft? 22 47 BSEL 

87 ATOX 2a CLX 3. 48 F5? 22 

88 CTO IND 2 21 + 34 XTOR 49 GTO 08 

35 Kor 56 BEEP 

@9+LBL 84 e2+LBL 3 36 RDN 51 .END. 

i0 2 232 37 DSE Y 

11 MOD 24 - 38 GTO 88 

12 256 25 FRC 39 7 

13 * 26 SF 22 xD c 

De az 
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Bedienung LB 


1. im RUN-Modus RTN 
GTO zu der Zeile, ab der die Bytes geladen werden sollen 

3. im PRGM-Modus XEQ_"LB" STOP und mindestens 7 * abgerundet 
(Byteanzahl / 7) + 26 Pufferbytes (z. B. ENTER+) eingeben 
GTO zurück zu der Programmzeile mit XEQ_"LB" 

5. im RUN-Modus R/S 

6. der zuletzt eingegebene Bytewert (beim ersten Mal O0) wird 
angezeigt 

7. wenn alle Bytes geladen sind R/S (ohne Eingabe), weiter bei 
9. 

8. Bytewert eingeben, R/S, weiter bei 6. 
nach Ende des Programmlaufes im PRGM-Modus die Anweisungen 
XEQ_"LB" STOP sowie die restlichen Pufferbytes löschen, 


während der Eingabe darf nur ein Wert eingetippt werden, da 
drei Stack-Register, LAST_X und das ALPHA-Register als Zwi- 
schenspeicher verwendet werden. Wurde ein Wert falsch eingege- 
ben, kann er noch vor R/S mit + korrigiert werden. Der Pro- 
grammlauf sollte nicht manuell unterbrochen werden - zwischen 
den Zeilen 040 und 044 folgt sonst MEMORY_LOST. Hält das Pro- 
gramm in Zeile 008 mit der Fehlermeldung NONEXISTENT an, wurde 
entweder RTN (1.) nicht ausgeführt oder LB von der Tastatur 


aus gestartet, 


5.4 KA - Key Assignment Programm 


Synthetische Anweisungen lassen sich wegen der sofortigen Syn- 
taxprüfung nicht mit ASN oder PASN Tasten zuordnen. Anderer- 
seits existieren synthetische Werkzeuge (Byte Grabber, Q-Loa- 
der), die nur als Key Assignment oder allenfalls als Anwei- 


sungs-Barcode funktionieren. 


de" 
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#1+LBL "KR° 14 "ANUM“ 2 ROL 38 CTO 88 
5 11 PASN 21 STOL 31 ATOX 
12 RCL " 22 Rt Jar cc 
83+LBL O8 13 STO L 23 XTORA 33 RCL I 
Bl 14 CLX 24 Rt 34 STO IND c 
05 SIGH 15 E 25 KTOA 35 ROY 
a6 CLST 16 CHS 26 LASTK 36 STO c 
87 "PRE+POSTTKE: 1? RROT 27 XTOR 37 CLA 
68 TOHE 9 18 CLX 28 RÜL \ 38 CLST 
89 PROMPT 19 ATOX 29 X=9? 39 ‚END, 


Bild 5-2 Listing KA 


Bild 5-2 zeigt ein KA-Programm (Autoren: Gerhard Kruse und 
M. G., Barcode s, 6.2), mit dem sich Tastenzuweisungen belie- 
biger 2-Byte-Kombinationen erzeugen lassen. Neben syntheti- 
schen Befehlen können auch normale 2-Byte-Funktionen wie SF_26 
oder GTO_IND_Y zugeordnet werden. 


In der Zeile O der Hexcode-Tabelle sind einige nicht progranm- 
mierbare "Funktionen! aufgeführt, die natürlich keinen Pro- 
grammcode benötigen. Ihre Codes für Key Assignments sind die 
Hexcodes der Anweisungen NULL (Nullbyte) bis LBL_14, welche 
nicht auf Tasten gelegt werden können. Einige dieser Zuordnun- 
gen zeigen ein seltsames Verhalten. So wird GTO_.. (01) nicht 
immer ausgeführt, + (OB) löscht auch im RUN-Modus die aktuelle 
Programmzeile, die Wirkung der Zuordnung OC hängt von der Ta- 
ste ab (USER/PRGM/ALPHA), 


Da KA eine synthetische Anweisung enthält, die sich so gut wie 
nicht mit dem Byte Grabber programmieren läßt, werden sinnvol- 
lerweise gleich alle synthetischen Befehle mit LB geladen: 
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Anweisung Zeilennr. Bytewerte für LB 
NER" 002 242 192 240 
X<>M 004 206 117 
TONE_9 008 159 89 
RCL_FH 012 144 122 
STO_M 013 145 117 

E 015 27 

STO_M 021 145 117 
RCL_N 028 144 118 
X<>c 032 206 125 
RCL_M 033 144 117 
STO_IND_c 034 145 253 
STO_c 036 145 125 


Bedienung KA 


im RUN-Modus XEQ_"KA" 

Anzeige: PRE+POST+KEY 

Eingabe Prefix-Byte, ENTER+ 

Eingabe Postfix-Byte, ENTER+ (entfällt bei 1-Byte-Anweisun- 


Son + 


gen) 

Eingabe Tastencode (wie bei ASN/PASN), R/S 

Anzeige: PRE+POST+KEY 

Eingabe des zweiten Key Assignments (wie 3. bis 5.) 


ono an 


Eingabe weiterer Tastenzuordnungen: R/S, weiter bei 2. 


Mit jedem Programmlauf müssen zwei Tasten belegt werden. Das 
zweite Key Assignment kann mit ASN oder PASN gelöscht werden. 
Als einfaches Dummy-Assignment eignet sich CAT (nach 
PRE4POSTAKEY nur den Keycode eingeben, R/S). Während der Ein- 
gabe ist der Stack frei (und mit O initialisiert), LAST_X darf 
nicht verändert werden. Der Programmlauf sollte nicht manuell 
unterbrochen werden, Zwischen den Zeilen 032 und 036 droht 
MEMORY_LOST; nach einem STOP zwischen den Zeilen 012 .und 013 
wird ein falsches Key Assignment gespeichert. 
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Innerhalb der Tastenzuordnungen dürfen keine Lücken entstehen. 


Dies ist sicher erfüllt, wenn 


- noch keine Tastenzuordnungen gespeichert sind (z. B. nach 
CLKEYS) oder 

- das jeweils neueste Key Assignment gelöscht wurde oder 

- sofort nach dem Löschen einer Tastenzuordnung mit PASN 
(nicht mit ASN oder KA) ein neues Assignment gespeichert 
wurde. 


Die KA-Werte des Byte Grabbers sind 247 und 55. 


5.5 TQ_ LQ GQ XQ - Q-Loader 


Die Q-Loader dienen der schnellen Programmierung kurzer syn- 
thetischer Texte in Textanweisungen sowie globalen Sprüngen 
und Labels. Sie können mit dem KA-Programm beliebigen Tasten 


zugeordnet werden: 


Anweisung KA-Werte Verwendungszweck 
TQ Text-Q-Loader 270 '!Text", Exponent-E 
LQ Label-Q-Loader 205 O0 LBL_"Text'" 

GQ GTO-Q-Loader 29 0 GTO_"Text!' 

XQ XEQ-Q-Loader 30 0 XEQ_"Text" 


Als Text-Q-Loader eignen sich sämtliche digit-entry-Anweisun- 
gen (KA-Werte 16 bis 28, jedoch sind bei der Ziffer O die Co- 
des zu vertauschen: O 16). Mit dem hier gewählten Text-Q-Loa- 
der läßt sich ein einzelnes Exponent-E auf einfache Weise pro- 


grammieren. 


Die beiden folgenden Anweisungen werden in Verbindung mit den 


Q-Loadern häufig benützt: 
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Anweisungen KA-Werte Verwendungszweck 
RCL_M 144 117 RCL Statusregister M 
STO_Q 145 121 STO Statusregister Q 


Bedienung Q-Loader 


- zu programmierenden Text in umgekehrter Reihenfolge im 
ALPHA-Register aufbauen 

- RCL_M STO_Q 

- im PRGM-Modus die entsprechende Q-Loader-Taste drücken 


- beim Text-Q-Loader das Exponent-E löschen 


Sind mehrere Texte mit dem Text-Q-Loader einzugeben, progran- 
miert man sie in umgekehrter Reihenfolge. Alle überflüssigen 
Bytes (E) bis auf eines stehen dann in einer Zeile und können 


mit + gelöscht werden. 


5.6 Die synthetischen Anweisungen des ADRESS-Systems 


Die Bilder 5-3 bis 5-7 zeigen alle synthetischen Befehle des 


ADRESS-Systems und die Methoden ihrer Programmierung. 
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en des ADRESS-Systems 


Die synthetischen Anweis 


5.6 


(se2) OL 

_ (zT)_dL 2opo 

> Da ISA ISE IT T97T Z ANI OLS 
(L21 ee) du 


> 9a LSA ISd TO TON ATO A ANI OLS 


_ (EE)_dL Aopo 
> da LSA LSA TO TON Z ANI OLS 
_ (L2ZT 8E)_ÖdL A>po 


> 9a LSd LS4 90 T9U TID A ANI OLS 


_ (8E)_dL Jopo 
> Ha ISd LSd 90 TOU Z ANI OLS 
(121 se) dL 


> DE 1Sd ISA EO TOU ATI A ANI OLS 


_ (se)_d8L A>po 
> Ha ISEd ISA E0 TOU Z QANI OLS 


(LE 8E LOT 6r 22) ÖL 


ceoo Tad 94 LSA 

IS@ 279 > 1SS 94 LSE „NWVUDOUddu 
ceoo "aa 94 LSA 

ISd UudJ > 1SS 9a 1SE wWTVHNII“ 
ceoo Tad I LSA 

L1Sd NOIS >» 1SS II LSA_uNATHAVZZu 
e00 Taad 94 LSA 

ISd SWH > 1SS 94 ISd „NAHISIOTIu 
co0 TaQ Da LSA LSA 

YIVd 9 > ISS IH_LSE „NUSANAVVu 
e00 Ta Ya LSA LSA 

ANY >» 1LSS IE LSA „AWHVNHANVYNANN 


ssayyuis 


SWOFSÄS-SSIUAV SEP usSZUnsTaMmueIxaL SyastyayQuAs T/E-S PITA 


see Ire 
ZI Ive 

gE LEI zr2 

ge Ive 

BE LET eve 

ge Tre 

ge LET eve 

ge Ire 

2L 67 LOT ge 12 re 


LL LL S9 28 
12 62 28 08 EIL 6re 


v8 92 

S9 2L BL EL 501 Lro 
82 69 94 

eL 69 S9 06 del Bro 
82 69 2L 19 

€e8 69 6/2 92 80T 6rc 
8L 28 69 


89 82 69 S9 c2 Bre 
69 LL 2L S9 8L OL 58 
S9 SB 69 BL OTT 2Se 


gT ıny sy1emeyAq 


OSEs 

LOTP OVOdN 200AN 
9LONI Z0O0NI 20044 
EEOU PEZT O2cL 
Tece 

bree 

Sce® 

BEI cree® Lrce 
sEOU EIEe 

9LEI Ovecl 

WEIT 6COP BZch ESce 


900u 


Leou 
seou 
ceou 
szoUu 
L2zou 


ezou 


USWWONIOA 


eu 
ey 
wie 
alu 
an 
n®u 
uf 
uf 


uHTXRrX u 


„NNVYyDOudd 

LTVHNITu 
NITHIVZZu 
uNSHISIOTILn 
„NYIANAVE u 


„IuHVNANVYNANU. 


Zunstamuy 


(E6T EET E6ELT) DI 
(E6T E6T) 81 
(E6T) 817 

(ze1) 87 

(zıt) d1 

(0TT) 81 

(80T) 81 

(sot) BT 

(TOT) 81 

(00T) 81 

(66) 817 

(z2) 81 

(16) ©1I 

2 (v2) 81 
(e2) 81 
(01) 81 
(69) 81T 


Synthetische Programmie 


asayuyuAs 


(E6T E6T) DL 


(LZT E6T) DL 


E6T) ÖL 


asayyuAs 
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SWUSISÄS-SSIHAV SOP USZUNSTSMUEISIET SYOSTIOUJUAS %-G PITq 


E61 E6L 
e6T E6L 
est 
set 
cell 
ort 
8oTr 


Lu! 

oO 

kur) 
oOOOO0000000000000 


aT any 


E6T 
vvz O0 261 
er2 O0 S6L 
cre O0 Z6l 
crc O0 s6l 
eve O0 61 
cre 0 S6T 
ere 0 S61 
evrz O0 S6l 
eve O 361 
cere O0 Z6l 
cre 0 Z6l 
ers O Z61 
ere O0 Z6l 
crsz O0 S6l 
er2 O0 361 
ers O Z6L 
eve O0 261 
oy1ı19MmaJAq 


eseu 
BgeuU 
Oseu 
g9gcW 
vscu 


L8BeU 


gbeu 
TseW 


uouni 


TOOP 
Toou 
oTow 
cchZ 
Y9r2d 
goou 
SBTt 
8rrT 
SL09 
g00op 
6/2 
SLOR 
g9Ece 
oorrf 
99EI 
7904 
eeed 


ONYIOA 


uvYVu_IadT 
uVVYu_Ia@T 
“uVu_ITaT 
uZu_IOT 
„du_TaT 
„uUu_IqT 
uTu_IgT 
utu_TaT 
usu_IgT 
»Pu_IgI 
u9u_TET 
„eu_Ig7 
„eu_IgT 
a fu_Tq7l 
„Iu_Ig7 
udu_TgT 
ud iaT 


Zunstamuy 


SUSFSAS-SSINAV SOp usdUnNSsTaMmueIxaL SYOSTISUYUÄS Z/E-S PITA 


E6T E6IT Zre 


e6T Zel erz 


E61 Iro 


gI nF 934a19M912A4gq 


roouw 

S6EeW HBEU PSOdN 
cTOdN 980NI ZTONI 
c90u 8rOdN 

L2OAN 600AN TSONI 
EZONI 600NI 6E0J4 
USWWONIOA 


Wi 


uva 


Yu 


ZuUnstamuy 
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en des ADRESS-Systems 


thetischen Anweis 


Die & 


5.6 


vrYrYt 


rr+r 


LS 
LSsa 
LS 
RAS 


jsa 
LSa 


LSa 
LS 
41Ssd 
LS4 


LSa 
LSd 


PI_MIIA 
TI_MAIA 
80_M3IA 
90 MIIA 


TO_MAIA 
00 MaIA 


SWOISAS-SSIHAV SaOp USBUnsTamuy-HLI-2IAÄg-E SyasTIsyUJuAs 9-5 PITE 


08_ANI_OLS 
08_ANI_OLS 
08_ANI_OLS 
08 aNI OLS 


08_ANI_OLS 
08 aNI 01S 


OsauyuAs 


vL 
TT 
8 
9 


T 
(6) 


00 


(6) 
6) 


802 
802 
802 
802 


80 
802 


dT any sy1a0mayAg 


Ore3 


ec2d 8Ted 8024 


S824 


LOre 
1823 
Tsou 


trou VEIP Z2TP PIIP 
grow 6/0OAN ZOTNI 


USUWIONIONA 


r71_019 
T1_019 
80_019 
90 019 


TO_019 
00 019 


ZunsTamuy 


swo4sÄs-ssIugdy sap usdunstamuedwmuids STeQ013 SUYUSSTIaUYUÄS S-S pITg 


est 
OL 


Irg 
Ire 


1474 
Tro 
1327 
Ire 


Tve 
Irc 


63 
67 


e7T In 2429M0JÄg 


89eI 
elocl 
9608 


LOOU 
rOOU 


6BrV 
L8TT 
O80R 
SOoou 


900P 
rOOP 


ScTA DOEOAN OEONI 


LEPZ 
6271 
Tece 
LEEI 


Lved 
EYPFT 
eIlee 
rLou 


vsow Zell 
TOP 800P 
ce9ce BEeze 
DEZT 857€ 

vLId 
90TE 9978 
00TE 0978 
eerZ 6rrtT 

eL04 
690U ZEIT 
LVOP 9TI> 
66ze OSTe 
6z0U 60TZE 
USWUIONIOA 


ulu_DIX 
uIu O3X 


„Fu_OAX 
„Au_OAX 
ıVu_OAX 
udn DAX 


uVu_0LD 
udu OLD 


Zunstamuy 


Synthetische Programmier 


5 


+ Hd 1Sd ISd -2 TE_ANI_OLS 
> D4 LSA 1Sd 60 OLS TE ANI OLS 


> 1SS ÖL 22po 
> DU vUAlNZ LSA XII 


> dad 1Sd LSA AAAS ZT aNI OLS 


> DE LSA LSA NVAW ZT ANI OLS 


> Hg 1Sd LSA NVSW 9T ANI TU 


s9sayQuAs 


sW34SÄS-SSINV SSP 


us3unsTsMuy SaYUOSTI9UJUÄS 3SISATP Z-S PITA 


2L 651 004 <_3NOL 
LS 651 6904 L 3NOL 
Le 162.4 8z0U 4 
sel srl LLO® 080A4N 8BOINI oO OLS 
Seel 
rLOI 9VEI 22E3 FI9EA 
SreT L60P 9S7e 090AN _ 
vet Srt LTOAN T6ONI ZTONI q4 OLS 
SZLEI 
8904 OVEiI 6/23 TI9EA 
EEeT 760P Yrze ESOAN = 
rail vrtT TTOAN S8ONI TTONI a Tau 
gI ınJ 933419M04Aq USUWONIOA ZuUnsTaMuy 


6 Anhang 


Cross Reference 


6.1 


yuıud 


INYINIISTNPON :39USISJSy SSOII) T-9 PTTE 


II [ iy Ma 4 sumd 9 (5 
„I gau (Iuyusraqau suaraıa au MrıI aqau 


Auclm, in 


INUAV Jauav NIUQV 


ıTyamaB 
TTaNHIS 


oT Beta 60 3e1d 8so 3e1d Lo 3eti 90 Ber so 3e1a 
8 


s3e1l1j pun 19IST331usIeq STqeTaeA :99U9A92JOY SSOAI 2-9 PpITg 


* (sepo9-IIISV) INNY Ppun JHON >Tmos snyz pun L01Z UsITeyyus g0 stq 00 asysıBey 


yuueysqun 
sssa1pe 
-Zunuds‘y 


+TUBma3 


D01vIqa 
sazjesus? 


-eaq sop 
S1r9Z 'I 


spI24 sop 
“az3s1 'T 
NIHIIIZV 
sptag sap 
DZAST I 
NAHIIIZV 


ZueZysuang 
193s19 


1991 
2s1 
qaIIZJIA 


(3) NI 


NSAa SSp 
Zunıspuy 
sutsY :NI 
(a)NI 


ıTyama3 


SSOUI UNN 
*ıodoasar 


/-araayag 
suyo :!:NI 


ıTuRmaB 
ALLVIIU 


+Tyems3 
HOSNVYLSNV 


(2) NI 


(O) NI 


(3) INO 


9731T0J.13 
sqeZutg 
: NO 
(F)IN0 


(I) INO 


(3) InO 


(31) InO 
ı1yems? 
aana 
Y1yema3 
Jana 


aIIIA 
/aT34V 
*e 193197 


(%X) no 


usy9TaZz 
ste LNNY 


so "Beu| vo "Sau | vom 


aIaav ur 
"yoTaz *T 
NSQ :LnO 


aTaav_ Ine 
193197 


K (a (670) 


NSa ne 
193197 


AaTI4V 


NAHIIIZA 
/NIHIIIZV 
*e ‘3197 
NAHIIAIZA 


/NSHII3ZV 
*e '3137 


usy9aTaz 
ste 3904 


din 


NI 


6.2 Barcodes 109 


6.2 Barcodes 


FORMAT 
PRGM REGS NEEDED: 42 


ROW 1 <c1-3) 


ROW 2 (4-8) 


ROW 3_ (8-12) 


ROW 4 12-11) 


ROW 5 <c11-14) 


ROW 6 (14-17) 


ROW 7 (17-19) 


ROW 8 (22-22) 


ROW 9 (23-25) 


ROW 12 (26-34) 


ROW 11 (35-43) 


ROW 12 (43-44) 


ROW 13 (44-52) 


FORMAT 
PRGM REGS NEEDED: 42 


ROW 14 (51-609) 


ROW 15 51-55) 


ROW 16 (66-568) 


ROW 17 (69-756) 


ROW 18 (77-85) 


ROW 19 (86-98) 


ROW zZ (99-101) 


ROW 21 (192-1102) 


ROW 22 (118-113) 


ROW 23 (114) 


6.2 Barcodes 


ADRBE 
PRGM REGS NEEDED: 13 


ROW 1 <1-3>3 


ROW 2 (4-7) 


ROW 3 (7-14) 


ROW 4 (15-21) 


ROW 5 (21-29) 


ROW 6 (29-356) 


ROW 7 (36-419 


112 


ADRIN 
PRGM REGS NEEDED: 43 


ROW 1 (1-3) 
ROW 2 (4-11) 
ROW 3 <12-17) 
ROW 4 (18-22) 
ROW 5 (23-26) 
ROW 6 (27-31) 
ROW 7 (32-38) 
ROW 8 (39-42) 
ROW 9 (42-47) 
ROW 10 (47-53 
ROW 11 (54-58) 
ROW 12 (58-564) 
ROW 13 (65-68) 
ROW 14 om 702 
ROW 15 (77-83) 


ROW 16 (83-89) 


6.2 Barcodes 113 


ADRIN 
PRGM REGS NEEDED: 43 


ROW 17 (9-94) 


ROW 18 (94-99) 


ROW 19 c99-125) 


ROW 22 (125-112) 


ROW 21 (113-114) 


ROW 22 (114-121) 


ROW 23 (122-131) 


ROW 24 (131) 


114 


ADRUP 
PRGM REGS NEEDED: 28 


ROW 1 c1-3 


ROW 2 (4-11) 


ROW 3 (12-17) 


ROW 4 (18-22) 


ROW 5 (22-27) 


ROW 6 27-31) 


ROW 7 32-36) 


ROW 8 (36-42) 


ROW 9 (43-47) 


ROW 12 (48-54) 


ROW 11 (54-60) 


ROW 12 (61-65? 


ROW 13 (65-712 


ROW 14 (71-76) 


ROW 15 (77-812 


ROW 16 (81) 


6.2 Barcodes 


A 
PRGM REGS NEEDED: 147 


ROW 1 <1-5) 


ROW 2 (6-11) 


ROW 3 (c11-15) 


ROW 4 (15-21) 


ROW 5 (22-23) 


ROW 6 (23-25) 


ROW 7 (26-28) 


ROW 8 (28-32) 


ROW 9 (32-32) 


ROW 12 (32-34) 


ROW 11 (35-379 


ROW 12 (37-39) 


ROW 13 (39-41) 


ROW 14 (41-45) 


ROW 15 (45-519 


ROW 16 (52-62) 


116 


A 


PRGM REGS NEEDED: 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


17 


18 


19 


ed 


ei 


e2 


23 


24 


e5 


26 


e7. 


28 


e9 


32 


31 


32 


Anhang 


(562-565? 


(55-569 


69-75 


75-79 


(79-82) 


(83-93) 


93-94) 


94-121) 


(122-108) 


(129-115 


115-119) 


119-122) 


(123-127) 


(128-134) 


(135-139) 


(139-1479 


6.2 Barcodes 


A 
PREM REGS NEEBDED».'147 


ROW 33 (148-156) 
ROW 34 (156-166) 
ROW 35 (167-173) 
ROW 36 _ (173-175) 
ROW 37 (175-181) 
ROW 38 (181-1879 
ROW 39 (188-194) 
ROW 4Q (195-2281) 
ROW 41 (222-208) 
ROW 42 (229-216) 
ROW 43 (216-222) 
ROW 44 (222-227) 
ROW 45 (228-234) 
ROW 45 (235-241) 
ROW 47 (242-250) 


ROW 48 (252-253) 
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A 


PRGM REGS NEEDED: 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


49 


SB 


51 


er 


53 


54 


39 


56 


57 


58 


9 


62 


61 


BE 


563 


54 


(254-256) 


(256-258) 


(258-262) 


(262-264) 


(264-266) 


(266-271) 


272-277) 


(277-283) 


(284-292) 


292-299) 


299-396) 


(327-312) 


(313-321) 


321-329) 


(3320-337) 


(337-345) 


6.2 Barcodes 


A 
PRGM REGS NEEDED: 147 


ROW 65 (346-352) 


ROW 66 (351-355) 


ROW 67 (357-363) 


ROW 568 (364-367) 


ROW 569 (367-3568) 


ROW 78 (369-377) 


ROW 71 (377-385 


ROW 72 (386-388) 


ROW 73 (388-391) 


ROW 74 (391-394) 


ROW 75_ (394-398) 


ROW 76 _ (398-399) 


ROW 77 (399-493) 


ROW 78 (4204-412) 


ROW 79 (412-414) 


ROW 8 (414) 
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Anhang 


AA 


PRGM 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


1 


2 


3 


8 


9 


12 


11 


Le 


13 


14 


15 


16 


REES NEEDED: 


(1-4) 


(4-7) 


/=13) 


(14-22) 


22-29 


(29-36) 


(37-44) 


(45-49) 


(49-57) 


(57-564) 


65-7193 


71-78) 


77-72 


(79-85) 


(85-92) 


91-95) 


14= 


6.2 Barcodes 


AA 
PRGM REGS NEEDED: 142 


ROW 17 (95-121) 


ROW 18 <c1iR21-124) 


ROW 19 (124-129) 


ROW 2QD 112-117) 


ROW 21 €117-123) 


ROW 22 (124-131) 


ROW 23 (132-140) 


ROW 24 (140-147) 


ROW 25 (148-154) 


ROW 26 (154-1512 


ROW 27 (162-1569 


ROW 28 (179-177) 


ROW 29 (177-184) 


ROW 32 (185-191) 


ROW 31 (192-198) 


ROW 32 (199-228) 


122 6 Anhang 


AA 
PRGM REGS NEEDED: 142 


ROW 33 (229-216) 


ROW 34 (217-224) 


ROW 35_ (225-231) 


ROW 36 c232-237) 


ROW 37 (237-238) 


ROW 38 (239-247) 


ROW 39 (247-254) 


ROW 42 (254-261) 


ROW 41 (261-2653) 


ROW 42 (254-2655) 


ROW 43 (265-272) 


ROW 44 (271-279) 


ROW 45 (2820-287) 


ROW 456 (288-294) 


ROW 47 (295-301) 


ROW 48 (3Q1-312) 


6.2 Barcodes 123 


AA 
PRGM REGS NEEDED: 142 


ROW 49 (311-318) 


ROW SZ (318-325) 


ROW 51 (325-332) 


ROW Se (333-342) 


ROW 53 (340-347) 


ROW 54 (348-3556) 


ROW SS_ (3556-363) 


ROW 56 (363-371) 


ROW 57 (372-3739 


ROW 58 (379-386) 


ROW 59 (387-394) 


ROW 6Q (394-402) 


ROW 61 (4293-410) 


ROW 52 (4129-420) 


ROW 63 (421-424) 


ROW 64 (424) 


124 


AA 
PRGM REGS NEEDED: 142 


ROW 65 (425-427) 


ROW 66 (428-429) 


ROW 67 (429-435) 


ROW 568 (436-443) 


ROW 569 (443-449) 


ROW 72 (450-457) 


ROW 71 (458-4656) 


ROW 72 (457-474) 


ROW 73 (474-479) 


ROW 74 (480-487) 


ROW 75_ (487-488) 


ROW 76 (489-491) 


ROW 77 (492) 


6.2 Barcodes 125 


AAA 
PRGM REGS NEEDED: 111 


ROW 1 (1-3) 


ROW 2 (4-56) 


ROW 3 (7-12) 


ROW 4 (12-13) 


ROW 5 _ c13-22) 


ROW 6 (21-27) 


ROW 7 (28-35) 


ROW 8 (36-43) 


ROW 9 (44-51) 


ROW 12] (51-58) 


ROW 11 (59-65) 


ROW 12 (56-74) 


ROW 13 (75-81) 


ROW 14 (82-89 


ROW 15 (92-95) 


ROW 16 (96-123) 


126 6 Anhang 


AAA 
PRGM REGS NEEDED: 111 


ROW 17 <C124-111) 


ROW 18 (111-118) 


ROW 19 (118-124) 


ROW 2Q (125-132) 


ROW 21 (132-139) 


ROW 22 (140-149) 


ROW 23 (152-159) 


ROW 24 (159-167) 


ROW 25 (168-175 


ROW 26 (176-183 


ROW 27 (184-1856) 


ROW 28 (186-191) 


ROW 29 (192-199) 


ROW 329 (199-227) 


ROW 31 (297-214) 


ROW 32_ (214-222) 


6.2 Barcodes 127 


AAA 
PRGM REGS NEEDED: 111 


ROW 33 (222-226) 


ROW 34 (226-230) 


ROW 35 (231-237) 


ROW 356 (238-245) 


ROW 37 (Cc245-251) 


ROW 38 (252-2564) 


ROW 39 (265-277) 


ROW 42 (278-292) 


ROW 41 c291-3093) 


ROW 42 (324-316) 


ROW 43 (317-329 


ROW 44 (330-342) 


ROW 45 (343-355) 


ROW 456 (355-3568) 


ROW 47 (369-381) 


ROW 48 (382-394) 


128 


AAA 
PRGM REGS NEEDED: 111 


ROW 49 (395-427) 


ROW SQ (498-420) 


ROW 51 (421-433) 


ROW SE (434-445) 


ROW 53 (447-459) 


ROW 54 (458-472) 


ROW 55_ (473-4853 


ROW 56 (486-498) 


ROW 57 (499-511) 


ROW 58 (512-524) 


ROW 59 (525-535) 


ROW 60 (537) 


6.2 Barcodes 129 


ADRRE 
PRGM REGS NEEDED: 19 


ROW 1 1-4) 


ROW 2 (4-12) 


ROW 3_ (12-16) 


ROW 4 (16-23) 


ROW S (23-32) 


ROW 6 (32-36) 


ROW 7 (37-43) 


ROW 8 (43-48) 


ROW 9 (49-54) 


ROW 12 (54-56) 


ROW 11 (572 


130 


LB 


PRCGM 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


ROW 


1 


2 


3 


REGS NEEDED: 


1-5) 


56-14) 


(14-25) 


26-33) 


(34-41) 


(42-49) 


(49-519 


13 


6.2 Barcodes 131 


KA 
PRGM REGS NEEDED: 13 


ROW 1 <c1-5) 


ROW 2 (56-79 


ROW 3 (7-12) 


ROW 4 (13-21) 


ROW 5 c21-29) 


ROW 6 (32-36) 


ROW 7 37-39) 
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6.3 


/1/ 


/2/ 


/3/ 


/a/ 


/5/ 


/6/ 
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Aktuelle Informationen bieten die beiden folgenden Clubs: 


CCD Computerclub Deutschland e. V., Postfach 2129, 6242 
Kronberg 2 


PPC, 2545 West Camden Place, Santa Ana CA 92704, U.S.A. 
German Chapter: PPC Dortmund, Heinz-Jörg Plegge, Am Roggen 
Kamp 20, D-4400 Münster 


Eine handliche Quick Reference Card ist von Synthetix, P.O,. 
Box 113, Manhattan Beach CA 90266, U.S.A., erhältlich 


6.4 Register 


A 
A (File) 720 61 70 74 76 
A (File) 6 20 24 54-55 

a (File) 10-11 20 24-26 
AA (File) 6 24 54 

AAA (File) 6 24 54 


Aaressıerung, indirekte 
82 84 88 93 
ADRBE Hilfsprogramm 
11 20-22 24-26 
ADRIN Hilfsprogramm 
6 10 22-26 39 
ADRRE 79 
ADRUP Hilfsprogramm 
26-28 39 58 
Ändern ä 1 3-5 33-39 90 
AFELD 7 
Anweisungstypen 93-94 
Anwendermodule 6 28-59 
Ausdruck-Prompt A 6 60 
Ausführungszeit, Minimierung 
der 80-81 
Auswahl a 
1 3-5 9 28-33 51 56 
AZEICHEN 7 


B 


Barcode 98 109-131 
Bedienung 5 
Benutzerschnittstelle 5 
Bootstrap der Dateibearbei- 

tung BE 11 20-22 24-26 
Bug 8 83 
Byte Grabber BG 

92 94-99 101 

- Jumper 94 


c 


Cassettenkennung 

10 24 39 52 54 72 
Cassettenwechsel c 

4 10 39-41 60 70-73 
CODE 9 48 70 
Codierung 92-94 
Computerclub Deutschland 

e. V. CCD 133 
Compilation 82 94 
Crash 92 


Cross Reference 107-108 


D 


DA-File (IL) 13 87 
Datei 1-2 7 
- verwaltung 1 
Datenpflege 5 
Datenregister 
79-80 87-91 108 
-file a 10-11 20 24-26 
Datensatz 1-259 
-anzahlen 
10-11 39 47 58-59 68 78 
-eingabe E 
5 28 33-34 41 61-66 74 


-feld 1-2 79 
-initialisierung D 
56 61 
-name DSN 9-10 15 33-34 
48 51 63 67 70 73-74 
Datenstruktur 8 
digit-entry-Operation 
87 90 101 
Directory 13 
Drucken d 1 4-5 41-47 55 
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E 


END-Anweisung 11 94 

Ende der Dateibearbeitung e 
4 47-48 52 

Ersatzdarstellungen 

Escape-Sequenz 42 

Exponent-E 87 101-102 

Extended Memory 2 7 11-12 


342 73 


F 


67-68 88 
67 88 


Fehlermeldung F 
Fehlernummer 
Feld 1-2 79 
File, AS-(ASCII-) (Extended 
Memory) 2 7 11 13-14 
-, AS-(ASCII-) (IL) 
2 7 13-14 
-, residentes 
5-6 18 20 54 
-, transientes 
5-6 18 54 58 
Flag 79 
FORMAT 14-17 
Funktion, Bearbeitungs- 
1 3-4 6 28-59 
-, interne 6 60-79 
-, nicht programmierbare 
99 


G 


GTO-Q-Loader GQ 92 101-102 


H 
Häufigkeit 81 
-, dynamische 
81 84 88-90 
-, statische 


81 84-86 88 90-91 
Hardware 2 
Hexcode Tabelle 93 
Hilfsprogramm 6 20-28 


I 


IL-Massenspeicher 12-13 
Inhaltsverzeichnis i (Modul) 
4 48-49 60 
- I (File) 9-10 15 20 22 
24 39 47 51 68-69 78 
Initialisierung des Inhalts- 
verzeichnisses I 68-69 
- der Datencassetten oder 
Kopie IN 
6 10 22-26 39 
interne Funktion 6 60-79 
internes Modul 6 60-79 


J 


Ja/Nein-Prompt J 22 69-70 


K 


Kartei 1 
-karte 1 

Kennung 
10 24 39 52 54 70-73 
-stest K 39 70-73 

Key Assignment 94-95 98-101 
- - Programm KA 


92 98-101 
KOBE ı0 24 39 52 54 70-73 
Konstante 11 87-91 


KUNT 10 24 39 52 54 70-73 
Kurzform-Format (Sprung) 
83-86 93 
- - (Datenregister) 
88-89 
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Label 54 81-87 94 101-102 
-, globales 
54 94 101-102 
-, gleichnamige lokale 
85-86 
-, lokales 81-87 
Langform-Format (Sprung) 
83-86 93-94 
- - (Datenregister) 
88-89 
LBL-Q-Loader LQ 92 101-102 
Load Bytes Programm LB 
92 97-99 
Löschen 1 
1 4 9 28 51-52 56 67 
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Main Memory 11-12 


Markierung 9 28 48 56 68 
Mengengerüst 2 11 14-17 
Menu m 5 10 39 42 52-55 


Modul 5 19-79 107 

-, Anwender- 6 20-59 
Modularisierung 5 107 
Modulstruktur 5 107 


N 


Neuaufnahme n 

1 3-5 9 28 34 51 56-58 
No operation NOP 94 
Normalisierung 65 87 


1) 


Oder-Verknüpfung 4 
Optimierung 80-91 
- lokaler Sprünge 81-87 
- numerischer Konstanten 
87-91 


P 


PARSE-Mode 42 55 
Peripherie-Funktion 93 
Plausibilitätskontrolle und 
programmierte Abkürzungen 
P A 28 33-34 56 65 74-77 
PPC 133 
Prefix-Masker 94 
PR-File (Extended Memory) 
12 
- (IL) 14 
Programmfile 6 18 25-26 
programmierbare Funktion p 
4 58 
Programmierung, synthetische 
83 85-88 92-106 
Programmoptimierung 80-91 
Programmspeicher 
11-12 18 97 


Programmzeiger 65 86-87 


Q 


Q-Loader GQ LQ TQ XQ 
92 98 101-102 

Quick Reference Card for 
Synthetic Programming 
93 


R 


RAM-Bereichs, Minimierung des 
80-81 
Record (Extended Memory) 
712 
- (IL) 13 87 
refinement, stepwise 5 
residentes File 
5-6 18 20 54 


Rücksprungadresse 65 86-87 
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Satzeingabe E 
5 28 33-34 41 61-66 74 76 
Save S 78 
Speicherung im Rechner 11 
- auf Cassette 13 
- der Software 18 
Sprung, absoluter 81 86-87 
-, globaler 94 101-102 
-, indirekter 82 84 93 
-, lokaler 81-87 93 
- ohne Label 83 
-, relativer 82 
-, symbolischer 82 
-adressierung 81-82 
Statusregister, Bezeichnung 
83 


-a 65 
-b 65 86-87 
-M 102 
-Q 102 


stepwise refinement 5 

synthetische Programmierung 
83 85-88 92-106 

Systemfehler 67 


Systemkonstante 11 79 
T 
Tastenzuordnung 
94-95 98-101 
Textanweisung 94 101-102 
Text-Q-Loader TQ 92 101-102 


transientes File 
5-6 18 54 58 


U 


Und-Verknüpfung 4 

Unterprogramm 65 

Update des Systems UP 
26-28 39 58 
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V 
V (File) 720 
VFELD 7 
Vorauswahl 9 33 
VZEICHEN 7 
W 
Wiederholen-Prompt W 78-79 
wild card 28 33 
Wolf-Befehl 94 
x 
XEQ-Q-Loader XQ 92 101-102 


Z 


zählen z 4 10 58-59 60 
ZAUS 11 39 47 59 68 78 
Zeichendarstellung 3 
ZTOT 11 39 47 59 78 


Neue Literatur 
zu programmierbaren Taschenrechnern 


Karl Heinz Gosmann 


Anwenderhandbuch HP-41 C/CV 

1983. VIll, 178 S. mit 26 vollst. Progr. und deren Auflistung im Bar-Code. 16,2 X 22,9 cm. Br. 
Inhalt: Manuelles Rechnen — Programmierung — Synthetische Programmierung — Anwendun- 
gen — Bar-Codes — Literaturverzeichnis — Sachwortverzeichnis. 

Programmierbare Taschenrechner werden immer leistungsfähiger. Den vorläufigen Schlußpunkt 
dieser Entwicklung bei Hewlett-Packard stellt der programmierbare Taschenrechner HP-41 C/CV 


dar. Durch seine bislang größte Speicherkapazität auf dem Taschenrechnersektor bietet er 
vielfältige Einsatzmöglichkeiten. Sein Bedienungskomfort ist gemessen an seinen Möglichkeiten 
groß, und durch seine Peripherie eignet er sich zum professionellen Einsatz und zur kommerziel- 
len Nutzung. 


Jörn Bruhn 


Statistik für programmierbare Taschenrechner (UPN) 

1984. VIII, 160 S. mit 56 Progr. und Programmvarianten. 16,2 X 22,9 cm. (Anwendung pro- 
grammierbarer Taschenrechner, Bd. 21.) Br. 

Inhalt: Mittelwerte — Streuungsmaße — Vergleich von Verteilungen — Auswahl von Stichpro- 
ben und Zufallszahlen — Wahrscheinlichkeitsverteilungen — Parameterabschätzung — Umfang 
von Stichproben — Testverfahren für intervallskalierte Daten — Testverfahren für rangskalierte 
Daten — Testverfahren für nominalskalierte Daten — Regression — Korrelation. 


Karlheinz Kraus 


Der HP-41 C/CV in Handwerk und Industrie 


Kalkulation — Planung — Arbeitsvorbereitung — Arbeitsstudien — Qualitätskontrolle — Statistik 
— Ergonomie — Arbeitsmedizin. 1984. VII, 169 S. mit 20 Progr. im Bar-Code. 16,2 X 229 cm. 
(Anwendung programmierbarer Taschenrechner, Bd. 22.) Br. 

Inhalt: Aufbau einer Zuschlagskalkulation — Lagerbestandsberechnung — Einzelzeitberechnung 
— Einzelzeitberechnung mit Warenüberlauf — Prozefßzeiten — Flächenberechnung — Volumen- 
und Gewichtsberechnung — Optimale Losgröße — Lernkurve — Lineare Regression mit Ver- 
trauensbereichen — Quadratische Regression — Anpassung an den Verlauf einer Gompertz- 
Kurve — Prüfung auf Normalverteilung — Auswertung von Meßwerten nach statischen Kenn- 
zahlen — Ermittlung des Zentralwertes bei nicht klassifizierten Maßstichproben — Zählstich- 
proben — Sortier-Routine — Dauerschallpegel Leg — Strahlungswärme — Körperflächen-Berech- 
nung. 
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11 TR/STACK 
29 30 8 17 record 
30 £ 3 incomplete 
18 res use 
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19 |[cleared ot 
20 Jturn-on 
21 prtr enable 
22 num. entry 
23 alpha entry 
24 range ignore 
25 error ignore 
26 audio enable 
27 USER mode 
28 dec. /comma 
29 digit grouping 
30 CAT 
31 timer 
DMY/MDY 
32 monval IL 1/0 
33 IL absolute 
manual 
34 not used 
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44 cont. ON 

45 system 
data entry 

46 partial key 
sequence 

47 SHIFT 

48 ALPHA 

49 low BAT 

50 message 

51 SST 

52 PGRM 

53 1/0 

54 PSE 

55 printer 
existence 


bit numbers in a 
7-byte register 


Michael Gehret 


Softwareentwicklung am Beispiel einer Dateiverwaltung (HP-41) 


Das Buch erfüllt mehrere Funktionen: 


— Für den reinen Anwender enthält es ein bewährtes Programmpaket zur 
komfortablen Verwaltung von Adressenmaterial. 

— Der Programmierer kann aus den Modulen der Adressenverwaltung nach 
einfachen Modifikationen ein System zur Verwaltung eines beliebigen 
strukturierten Datenbestandes zusammenstellen und optimieren. 

— Das Buch zeigt den Einsatz moderner Methoden der Softwareentwicklung 
(Modularisierung, schrittweise Verfeinerung) mit dem HP-41. 

— Schließlich findet der interessierte Leser zwei einfache Verfahren zur Pro- 
grammoptimierung, zahlreiche Tricks zur Verringerung der Rechenzeit 
und des Speicherbedarfs sowie interessante Details wie etwa die Speicher- 
formate des Rechners und des IL-Massenspeichers. Außerdem wird ein 
kurzer, praxisbezogener Zugang zur synthetischen Programmierung ver- 
mittelt. 
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